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

 


A242174型
的最小素数因子A005260号(n) 它不划分任何以前的术语A005260号(k) 其中k<n,或1,如果A005260号(n) 不存在。
4
2, 3, 41, 5, 7, 349, 61, 75617, 31, 13, 499, 643897693, 17, 19, 1729774061, 101, 2859112064587, 138407, 83, 167, 59, 29, 653, 257, 997540809461453561581, 347, 13679, 37, 160449179727717672892660463, 211, 151, 43, 97, 73, 47
抵消
1,1
评论
猜想:a(n)是任意n>0的素数。一般来说,对于任何r>2,如果n足够大,那么f_r(n)=sum_{k=0..n}C(n,k)^r有一个素除数,它不将前面的任何项f_r。
链接
例子
a(3)=41,因为A005260号(3) =2^2*41,其中41不除以A005260号(1) =2和A005260号(2) = 2*3^2.
数学
u[n_]:=和[二项式[n,k]^4,{k,0,n}]
f[n_]:=系数整数[u[n]]
p[n_]:=表[部分[部分[f[n],k],1],{k,1,长度[f[n]]}]
执行[如果[u[n]<2,转到[cc]];Do[Do[If[Mod[u[i],Part[p[n],k]]==0,Goto[aa]],{i,1,n-1}];打印[n,“”,部分[p[n],k]];后藤[bb];标签[aa];继续,{k,1,长度[p[n]]}];标签[cc];打印[n,“”,1];标签[bb];继续,{n,1,35}]
关键字
非n
作者
孙志伟2014年5月7日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年9月21日08:46。包含376084个序列。(在oeis4上运行。)