登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A337449飞机 Lucas(k)表示Niven数的数字k。
0, 1, 2, 3, 4, 6, 12, 18, 56, 81, 130, 225, 396, 637, 854, 2034, 4059, 4095, 5985, 7650, 21105, 31059, 41998, 46860, 83106, 114129, 120555, 150705, 201285, 287937, 338265, 359757, 475839, 512194, 583825, 606594, 627102, 717025, 877305, 922095, 991590, 1076355 (列表;图表;参考;;历史;文本;内部格式)
偏移
1,3
评论
对于a(6)=6,Lucas(6)=18和18/digsum(18)=2是质数,所以Lucas是Moran数(A001101号).
对于a(9)=56,Lucas(56)=505019158607和505019158/607/digsum(5050191158607)=10745088481是质数,所以Lucas是Moran数。
链接
例子
卢卡斯(0)=2=A005349号(2) ,所以0是一个术语。
卢卡斯(1)=1=A005349号(1) ,所以1是一个术语。
卢卡斯(6)=12=A005349号(11) ,所以6是一个术语。
卢卡斯(12)=322=A005349号(90),所以12是一个术语。
卢卡斯(18岁)=5778=A005349号(1013),所以18是一个术语。
数学
nivenQ[n_]:=可除法[n,加上@@IntegerDigits[n]];选择[Range[6000],nivenQ[LucasL[#]]&](*阿米拉姆·埃尔达尔2020年9月15日*)
黄体脂酮素
(岩浆)niven:=func<n|n mod&+Intseq(n)eq 0>;[0..70000]|niven(Lucas(k))中的k:k;
(PARI)isok(k)=my(l=真实((2+quadgen(5)));(l%总和(l))==0\\米歇尔·马库斯2020年9月15日
(Python)
A337449飞机_列表,k,p,q=[],0,2,1
当k<10**6时:
如果p%sum(int(d)for d in str(p))==0:
A337449飞机_list.append(k)
k+=1
p、 q=q,p+q#柴华武2020年9月17日
交叉参考
关键词
非n,基础
作者
马吕斯·A·伯蒂2020年9月14日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

最后修改时间:美国东部时间2024年4月18日18:58。包含371781个序列。(在oeis4上运行。)