%I#23 2020年12月10日01:33:48
%S 1,4,9,6,25,16,49,10,15,36121,54169100,81,14289,2436115025,
%电话:196529250,35484,21294841,64961,22441676625,9013691156,
%电话:10894901681144184972637514442209686、77、6015210142809、40122512126012116348148637213364735、263025400
%N a(N)=A005940(1+A048724(A156552(N)))。
%H Antti Karttunen,n的表格,n=1..16384的a(n)</a>
%H<a href=“/index/Ge#GF2X”>环GF(2)[X]中多项式相关序列的索引项</a>
%H<a href=“/index/Pri#prime_indices”>根据素因式分解中的索引计算出的序列的索引项</a>
%F a(n)=A005940(1+A048724(A156552(n)))。
%对于所有素数p,F a(p)=p^2。
%F对于所有平方数u,a(u)=A332449(u)和A010052(a(u))=1。
%F a(A003961(n))=A003961。
%Fα(A293448(n))=A293448。
%F a(A332450(n))=A332450;A332450(a(n))=A003961(A332450))。
%F A008836(a(n))=所有n的+1。
%o(PARI)
%o A005940(n)={my(p=2,t=1);n--;直到(!n\=2,if((n%2),(t*=p),p=下一素数(p+1));t};\\来自A005940
%o A048724(n)=比特异或(n,2*n);\\来自A048724
%o A156552(n)={my(f=因子(n),p2=1,res=0);对于(i=1,#f~,p=1<<(素数(f[i,1])-1);res+=(p*p2*(2^(f[i,2])-1));p2<<=f[i、2]);res};\\来自A156552
%o A332451(n)=A005940(1+A048724(A156552(n)));
%Y参考A000290、A003961、A005117(给出正方形位置)、A005940、A008836、A010052、A048724、A156552、A277010、A293448、A332449、A332450。
%A028260的Y排列。
%Y参考A332460了解互补序列(在其初始1之后)。
%K nonn公司
%O 1,2号机组
%2020年2月15日,安提·卡图内
|