编辑
经核准的
一个(A000079号(n) )=A133145号(n) ;一个(A000302号(n) )=A010685号(n) ;一个(A001025号(n) )=A161452号(n) ;一个(A161440型(n) )=0;一个(A161441号(n) )=1;一个(A161442号(n) )=2;一个(A161443号(n) )=3;一个(A161444号(n) )=4;一个(A161445号(n) )=5;一个(A161446号(n) )=6;一个(A161447号(n) )=7;一个(A161448号(n) )=8;一个(61449英镑(n) )=9;一个(A161450型(n) )=10;一个(A161451号(n) )=11;一个(A161452号(n) )=12;一个(A161453号(n) )=13;一个(A161454号(n) )=14;一个(A161455号(n) )=15。[发件人 _- _Reinhard Zumkeller_,2009年6月10日]
(PARI)a(n)=我的(t=n%16);而(n>15,n>>=4;t=bitxor(t,n%16));t吨\\查尔斯·格里特豪斯四世2018年1月25日
非n,改变,容易的
提出
a[n]:=a[n]=如果[n<16,n,a[Floor[n/16]]~BitX或~Mod[n,16]];
表[a[n],{n,0,100}](*让-弗朗索瓦·奥尔科弗2018年1月25日*)
异或数(进程名称(地板(n/16),),modp(n,16))
读取(“转换”);
A160700个:=进程(n)
如果n<16,则
n;
其他的
XOR编号(楼层(n/16),模块(n,16))
结束条件:;
结束进程:#R.J.马塔尔2016年7月12日
(哈斯克尔)
导入数据。位(xor)
a160700 n=a160700_列表!!n个
a160700_list=[0..15]++映射f[16..]其中
f x=a160700 x’`xor`m::Int其中(x',m)=divMod x 16
--莱因哈德·祖姆凯勒2012年11月7日