A069524-OEIS公司

A069524号

数字和为5的n的最小倍数，如果不存在这样的数字，则为0，例如a（3k）=a（11k）=0。

5, 14, 0, 32, 5, 0, 14, 32, 0, 50, 0, 0, 104, 14, 0, 32, 221, 0, 1121, 140, 0, 0, 23, 0, 50, 104, 0, 140, 203, 0, 2201, 32, 0, 2210, 140, 0, 0, 3002, 0, 320, 41, 0, 2021, 0, 0, 230, 2021, 0, 22001, 50, 0, 104, 212, 0, 0, 1400, 0, 2030, 1121, 0, 122, 22010, 0, 320, 1040

(列表;图表;参考;听;历史;文本;内部格式)

抵消

1,1

a（3k）=a（11k）=b（37k）=0-雷·钱德勒2003年7月30日

链接

罗伯特·伊斯雷尔，n=1..3000时的n，a（n）表

配方奶粉

a（n）=n*A088394号（n） ●●●●-R.J.马塔尔2019年8月6日

MAPLE公司

nextL:=进程（L）

局部m，q，Lp；

对于1 do中的m

如果L[m]>0，则

如果m=线性代数：-维数（L），则返回<4,0$（m-1），1>

其他Lp:=L；

Lp[1]：=L[m]-1；

Lp[2..m]：=0；

Lp[m+1]：=L[m+1]+1；

返回Lp；

fi（菲涅耳）

od；

结束进程：

N： =300：

议程：=删除（t->ormap（s->（t mod s=0），[3，11，37，101，137，239]），{$1..N}）：

五十： =<5>：x:=5:

A： =矢量（N）：

而议程<>{}和x<10^40

x： =加法（L[i]*10^（i-1），i=1.线性代数：-维数（L））；

找到，议程：=selectremove（t->x mod t=0，议程）；

如果找到<>{}，则

A[convert（found，list）]：=x；

fi；

五十： =下一个L（L）；

日期：

转换（A，列表）：#罗伯特·伊斯雷尔2019年9月5日

交叉参考

囊性纤维变性。A052219号,A069521号,A069522号,A069523号.

上下文中的序列：A240765型 A127317号 A049506号*A262612型 A333025型 A144518号

相邻序列：A069521号 A069522号 A069523号*A069525号 A069526号 A069527号

关键词

基础,非n

作者

阿玛纳斯·穆尔西2002年4月1日

扩展

更多术语来自雷·钱德勒2003年7月30日

状态

经核准的