登录
A066308号
a(n)=(n位数之和)*(n位数的乘积)。
5
1, 4, 9, 16, 25, 36, 49, 64, 81, 0, 2, 6, 12, 20, 30, 42, 56, 72, 90, 0, 6, 16, 30, 48, 70, 96, 126, 160, 198, 0, 12, 30, 54, 84, 120, 162, 210, 264, 324, 0, 20, 48, 84, 128, 180, 240, 308, 384, 468, 0, 30, 70, 120, 180, 250, 330, 420, 520, 630, 0, 42, 96, 162, 240, 330
抵消
1,2
评论
a(n)可以大于、小于或等于n;请参阅示例部分。
链接
哈里·史密斯,n=1..1000时的n,a(n)表
例子
对于n=12,a(12)=(1+2)*(1*2)=3*2=6<n;
对于n=19,a(19)=(1+9)*(1*9)=90>n;
对于n=135,a(135)=(1+3+5)*(1*3*5)=135=n。
数学
asum[x_]:=应用[Plus,IntegerDigits[x]]apro[x_]:=应用[Times,IntegerDigits[x]]a[n]=asum[n]*apro[n]
sdpd[n_]:=模块[{idn=整数位数[n]},总计[idn]次@@idn];数组[sdpd,70](*哈维·P·戴尔2011年12月31日*)
黄体脂酮素
(PARI)和D(x)={局部(s=0);而(x>9,s+=x%10;x\=10);返回(s+x)}
ProdD(x)={local(p=1);当(x>9&p>0,p*=x%10;x\=10);返回(p*x)}
{对于(n=1000,a=SumD(n)*ProdD(n);写入(“b066308.txt”,n,“”,a))}\\哈里·史密斯2010年2月9日
(PARI)a(n)=我的(d=数字(n));vecsum(d)*prod(k=1,#d,d[k])\\米歇尔·马库斯2017年2月24日
交叉参考
关键词
基础,容易的,非n
作者
拉博斯·埃利默2001年12月13日
扩展
编辑人乔恩·肖恩菲尔德2018年7月9日
状态
经核准的