%I#20 2021年1月3日12:29:40
%S 1,2,6,4,30,3210,8,36,152310,243003105,16510510,729699690,
%电话:120,35115223092870,1290150152168406469393230,10,
%电话:200560490130,3238525555,7,974207381348104848455005,6030425026352721037003092401080111546435614889782588491410
%N如果N=Product_{i>0}素数(i)^e(i),则a(N)=Product_}i>0{素数“i”^(XOR_{j>=i}e(j)),其中XOR是按位异或。
%这个序列是自然数的排列。
%C 2的幂是这个序列的不动点。
%对于任何i>0,C a(质数(i))=A002110(i)。
%对于任何i>0,C a(i^2)=a(i)^2。
%对于任何n>=0,C a(A019565(n))=A019565。
%H Paul Tek,n的表,n的a(n)=1..2370</a>
%H Paul Tek,此序列的PERL程序</a>
%H<a href=“/index/Per#IntegerPermutation”>自然数排列序列的索引项</a>
%e a(50)=a(2^1*3^0*5^2)
%e=2^xor(1,0,2)*3^xor
%e=2^3*3^2*5^2
%e=1800。
%o(Perl)请参阅链接。
%o(哈斯克尔)
%o导入数据。位(xor)
%o a226532 n=产品$zipWith(^)
%o a000040_list(scanr1 xor$a067255_row n::[Integer])
%o——Reinhard Zumkeller,2013年6月11日
%Y参考A006068。
%Y参见A226569(反向)、A067255、A000040。
%K nonn公司
%O 1,2号机组
%A Paul Tek,2013年6月10日
|