A274354-OEIS公司

OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。

A274354型

系数L（i）>1的数量A274281型（n），其中L=A000032号（卢卡斯数，2,1,3,4，…，不包括1）

1, 1, 1, 2, 1, 2, 1, 2, 2, 1, 2, 2, 3, 2, 1, 2, 2, 3, 2, 1, 2, 3, 2, 3, 2, 1, 2, 3, 2, 3, 2, 3, 2, 1, 2, 3, 2, 3, 2, 3, 4, 3, 2, 2, 1, 2, 3, 2, 3, 3, 2, 3, 4, 3, 2, 3, 2, 1, 2, 3, 2, 3, 3, 3, 2, 3, 4, 3, 4, 2, 3, 2, 1, 2, 2, 3, 3, 2, 3, 3, 4, 3, 2, 3, 4, 3 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,4`
	链接	`n=1..86时的n，a（n）表。`
	例子	`不同卢卡斯数（包括2，不包括1）的乘积按递增顺序排列，包括A274281型（去掉1个）。列表以2、3、4、6=23、7、8=24、11、12、14、18、21、22、24=234开头，因此a（4）=2、a（6）=2，a（13）=3。`
	数学	`r[1]：=2；r[2]：=1；r[n]：=r[n]=r[n-1]+r[n-2]；` `s={1}；z=40；f=Join[{2}，Map[r，2+Range[z]]]；取[f，10]` `Do[s=并集[s，选择[sf[[i]]，#<=f[[z]]&]]，{i，z}]；` `infQ[n_]：=成员Q[f，n]；` `ans=表格[#[[Flatten[Position[Map[Apply[Times，#]&，#]，s[[n]]][1]]]&[` `Rest[Subset[Map[#[[1]]&，Select[Map[{#，infQ[#]}&，` `除数[s[[n]]]，#[[2]；` `取[ans，10]` `w=地图[长度，ans]` `地图[Apply[Times，#]&，Select[ans，Length[#]==2&]](A274349号)` `地图[Apply[Times，#]&，Select[ans，Length[#]==3&]](A274350型)` `(彼得·J·C·摩西2016年6月17日*）`
	交叉参考	`囊性纤维变性。A000032号,A274353型,A274349号,A274350型,A160009型,A272947号.` `上下文中的序列：A177740号 A118458号 A118459号A083870号 A368779型 A052299号` `相邻序列：A274351型 A274352型 A274353型A274355型 1974年 A274357型`
	关键词	`非n,容易的`
	作者	`克拉克·金伯利2016年6月18日`
	状态	`经核准的`

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

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

上次修改时间：美国东部夏令时2024年6月3日12:27。包含373060个序列。（在oeis4上运行。）