A153631-OEIS公司

A153631号

数n，使n模（n位数的乘积）=（n位数之和）。

23, 29, 33, 39, 43, 49, 53, 59, 63, 69, 73, 79, 83, 89, 93, 99, 133, 136, 137, 192, 194, 195, 222, 223, 226, 229, 261, 263, 267, 313, 316, 331, 332, 333, 334, 336, 339, 391, 392, 397, 441, 443, 449, 621, 623, 661, 662, 663, 666, 669, 912, 914, 915, 931, 932 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,1`
	评论	`像136137这样的连续数字经常出现吗？序列中出现了许多素数吗？` `对n进行编号，使n的正整数余数/A007954号（n）等于A007953号（n） ●●●●。[R.J.马塔尔，2009年1月3日]`
	链接	`B.D.Swan，n=1，…，n，a（n）表，。。。，20000`
	例子	`对于n=83，（n的位数乘积）=24，（n位数之和）=11，83=324+11。` `对于n=93，（n的位数乘积）=27，（n位数之和）=12，93=327+12。`
	MAPLE公司	sd:=proc（n）options运算符，箭头：add（convert（n，base，10）[j]，j=1。。nops（convert（n，base，10））end proc:pd:=proc（n）选项运算符，arrow:product（convert（n，base，10）[j]，j=1。。nops（convert（n，base，10））end proc:a：=proc（n），如果0<pd（n）且`mod`（n，pd（n））=sd（n。。1000); #Emeric Deutsch公司2009年1月2日 `A007953号：=程序（n）局部i；加上（i，i=换算（n，基数，10））；结束时间：A007954号：=程序（n）局部i；mul（i，i=换算（n，基数，10））；结束：对于从1到1200的n，do ifA007954号（n） >0，则如果irem（n，A007954号（n））=A007953号（n）然后是printf（“%d，”，n）；fi；fi；日期：#R.J.马塔尔，2009年1月3日`
	交叉参考	`上下文中的顺序：A277206型 A214754号 A344375型A082943号 A061754美元 A180066型` `相邻序列：A153628号 A153629号 A153630型A153632号 A153633号 A153634号`
	关键词	`基础,容易的,非n`
	作者	`J.M.贝戈2008年12月29日`
	扩展	`编辑、更正（插入93）并扩展到a（21）以外克劳斯·布罗克豪斯2009年1月6日` `更正和扩展人Emeric Deutsch公司和R.J.马塔尔2009年1月2日`
	状态	`经核准的`