OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
（来自的问候整数序列在线百科全书!)
搜索： a274354-id:a274354
显示1-1个结果（共1个）。 第页1
    排序：关联|参考文献|数|被改进的|创建     格式：长的|短的|数据
A274353型 系数L（i）>1的数量A274280型（n） ，其中L=A000032号（卢卡斯数，1,3,4，…） +10
2
1, 1, 1, 1, 1, 2, 1, 2, 2, 1, 2, 2, 1, 2, 2, 1, 2, 3, 2, 2, 1, 2, 3, 2, 2, 2, 1, 2, 3, 2, 3, 2, 3, 2, 1, 2, 3, 2, 3, 2, 3, 2, 1, 2, 2, 3, 3, 2, 3, 3, 2, 3, 2, 1, 2, 2, 3, 4, 3, 2, 3, 3, 2, 3, 2, 2, 1, 2, 3, 2, 3, 4, 3, 2, 3, 3, 3, 2, 3, 3, 2, 2, 1, 2, 3, 2 (列表;图表;参考;听;历史;文本;内部格式)
抵消
1,6
链接
G.C.格鲁贝尔，n=1..1000时的n，a（n）表
示例
不同卢卡斯数的乘积按递增顺序排列，包括A274280型。列表以1、3、4、7、11、12=3*4开头，因此a（6）=2。
数学
r[1]：=1；r[2]：=3；r[n]：=r[n]=r[n-1]+r[n-2]；
s={1}；z=40；f=地图[r，范围[z]]；取[f，10]
Do[s=并集[s，选择[s*f[[i]]，#<=f[[z]]&]]，{i，z}]；
infQ[n_]：=成员Q[f，n]；
a=表格[#[[Flatten[Position[Map[Apply[Times，#]&，#]，s[[n]]][1]]]&[
Rest[Subset[Map[#[[1]]&，Select[Map[{#，infQ[#]}&，
除数[s[[n]]]，#[[2]；
ans=连接[{{1}}，a]；取[ans，8]
w=地图[长度，ans](*A274353型*)
地图[Apply[Times，#]&，Select[ans，Length[#]==2&]](*A274347号*)
地图[Apply[Times，#]&，Select[ans，Length[#]==3&]](*A274348号*)
(*彼得·J·C·摩西2016年6月17日*）
交叉参考
囊性纤维变性。A000032号,A274280型,A274347号,A274348号,A160009型,172947英镑,A274354型.
关键词
非n,容易的
作者
克拉克·金伯利2016年6月18日
状态
经核准的
第页1

搜索在0.003秒内完成

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

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

上次修改时间：美国东部夏令时2024年6月15日10:19。包含373407个序列。（在oeis4上运行。）