登录

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

 

提示 （来自的问候整数序列在线百科全书!) A264737型 划分某项的素数A000085号（对合数）。 2 2, 5, 13, 19, 23, 29, 31, 43, 53, 59, 61, 67, 73, 79, 83, 89, 97, 103, 131, 137, 151, 157, 163, 173, 179, 181, 191, 197, 199, 211, 229, 233, 239, 241, 281, 293, 307, 317, 347, 359, 367, 373, 379, 389, 397, 409, 419, 421, 431, 433, 443, 449, 457, 461, 463, 479, 487, 491, 499 (列表；图表；参考；听；历史；文本；内部格式) 偏移 1,1 评论 基本上与A245177型. -R.J.马塔尔2015年11月25日 链接 罗伯特·伊斯雷尔，n=1..4000时的n，a（n）表 配方奶粉 通过迭代递归，可以很容易地测试任何一个质数p在这个集合中的隶属度A000085号mod p，T（n）=T（n-1）+（n-1）T（n-2）模p，直到找到一个可被p整除的值或进入一个循环。 例子 23分A000085号（11） =35696=2^4*23*97，因此它出现在这个集合中。序列A000085号mod 3循环：1,1,2,1,1,2，。。。，所以素因子3不出现在这个集合中。 MAPLE公司 过滤器：=proc（p）局部a，b，c，n，R； 如果不是isprime（p），则返回false fi； a： =1；b： =1； R[1，1，1]：=1； 对于2 do中的n c： =a+（n-1）*b mod p； 如果c=0，则返回真fi； b： =a；a： =c； 如果R[a，b，（n mod p）]=1，则返回假fi； R[a，b，（n mod p）]：=1； 日期： 结束进程： 选择（过滤器，[2，seq（i，i=3..1000，2）]）#罗伯特·伊斯雷尔2015年11月22日 数学 A85=DifferenceRoot[函数[{y，n}，{（-n-1）y[n]-y[n+1]+y[n+2]==0，y[1]==1，y[2]==2}]]； selQ[p_]：=AnyTrue[Range[p-1]，可除[A85[#]，p]&]；selQ[2]=真； 收获[For[p=2，p<1000，p=NextPrime[p]，If[selQ[p]，Print[p]；母猪[p]]][[2,1]](*Jean-François Alcover公司2020年7月28日*） 交叉参考 囊性纤维变性。A000085号。本质上是的副本A245177型. 上下文中的序列：A235204型 A354706型 A348392飞机*A045364号 A045365型 A104491号 相邻序列：A264734型 A264735型 A264736型*A264738型 A264739型 A264740型 关键词 非n,容易的 作者 大卫·艾普斯坦2015年11月22日 状态 经核准的

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

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

上次修改时间：2024年4月18日22:18 EDT。包含371782个序列。（在oeis4上运行。）