#来自在线整数序列百科全书的问候!本次搜索:id:a020946〈展示1-1的1个1个1个 ;%I a020946;%S a020946;%S a020946 0,1,1,3,5,5,9,11,33,19,19,21,35,39,37,45,43,69,73,73,93,77,75,75,189189189,85141,;%T a020946 139141,;%T a020946 139153151147155155155155155167717127912727517128312831527753737325,;%U a020946 2972729357579357930130936365329955353535353535353535753575357535753575357535753575329955329955353535495631275341585565615629 %N a020946 a(N)=最小数使得A002487(k)=n. %H A020946 Charles R Greathouse IV,n=0..10000时的n,a(n)表%e A020946 A002487(33)=6,这是第一次出现6,所以a(6)=33. %t A020946 aa={};a[0]=0;a[1]=1;a[n_u]:=a[n]=如果[EvenQ[n],a[n/2],a[(n-1)/2]+a[(n+1)/2];Do[k=0;While[a[k]!=p,k++];AppendTo[aa,k],{p,0,100}];aa(*Arturur Jasinski,Dec 06 2010 2010年12月6日*);%o A020946(PARI)fusc(n)={my(a=1,b=0);而(n,n,if(bitand(n,1),b+=a,a+=b;n>>=1);n>>=1;b>=1);b>=1;b};;%o A020946列表(n)={;%o A020946 my(v=v=矢量(n),n),k);;%o A020946 forstep(n),forstep(n)(k);%o A020946 forstep(o A020946)步(n n=1,9e99,2, %o A020946 k=fusc(n); %o A020946如果(k<=n&&!v[k],;%o A020946 v[k]=n;;%o A020946 if(vecmin(v),return(v));%o A020946);%o A020946);%o A020946);%o A020946);%o A020946。;%o A020946};\\\ u查尔斯R Greathose IV,2011年12月20日,2011年12月20日,;%Y A020946等于A020950+1。;%Y A020946比较A020943-A020943-A020945、A002487、A020947-A020950。;%k A020946 nonn;%o A020920946非n;%o A020920946非n;%o A020920946 A020946非n;%46 0,3%A A020946;斯隆和威尔逊,许可证在2002年6月 根据http://oe27获得