%I#12 2021年10月31日15:27:41
%S 1,2,4,8,16,32,64,65128129130256257258260512513514516520,
%电话:1024102510261028103210402048204920502052205620642080,
%电话:409640994100411241284160416181819281938194819682008208
%N整数N>0,因此N XOR 62*N=63*N。
%H Ivan Neretin,n的表,n的a(n)=1..10000</a>
%F这个序列似乎也满足了:
%F3*a(n)XOR 41*a(n=42*a(n);
%F 5*a(n)XOR 35*a(n)=38*a(m);
%F 6*a(n)XOR 35*a(n=37*a(n);
%F 7*a(n)XOR 35*a(n)=36*a(m);等。
%t选择[Range[8300],BitXor[#,62#]==63#&](*哈维·P·戴尔,2021年10月31日*)
%o(Perl)
%o$cnt=0;
%o每个(1..8_000){
%o打印++$cnt,如果((62*$_)^$_)==63*$_,则为“$_\n”;
%o}(o)
%o#_Ivan Neretin_,2016年11月11日
%o(PARI)isok(n)=位异或(n,62*n)==63*n;\\_米歇尔·马库斯(Michel Marcus),2016年11月11日
%Y参考A003714(Fibbinary numbers)、A048715、A04871、A115422、A115423。
%K nonn公司
%O 1,2号机组
%A·保罗·D·汉纳,2006年1月22日
|