本网站由以下捐款支持:OEIS基金会.

用户:Ruud H.G.van Tol/Todo

来自OeisWiki
跳转到:航行,搜索

编辑

-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --A007059号,添加程序员:{t(n,k)=如果(!n,1,if(!k,总和(j=1,n,t(n-j,j;type(memoize)==“t_CLOSURE”&&t=内存大小(t);\\使用Kevin Ryde的备忘录.gpa(n)=t(n-1,0);}? [a(n)|n<-[0..20]]% [0, 1, 1, 2, 3, 5, 8, 14, 24, 43, 77, 140, 256, 472, 874, 1628, 3045, 5719, 10780, 20388, 38674]-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --A048572美元,更改名称:-a(n)=a(n-1)*a(n-2)的位数之和。+a(1)=1;a(2)=2;a(n+2)=a(n+1)*a(n)的位数之和。-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --A059442号(拉姆齐数字数组),添加Cf。2005年5月09日,A192708型.-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --A100982号,添加程序员:alist(N)={我的(a=Vec(1,N));对于(k=2,N,a[k]=和(m=1,k-1,(-1)^(m-1)*二项式(logint(3^(k-m),2)+m-1,m)*a[k-m]));a;}添加Cf。A060941型,A293946型.将v2={2,1,3,11,23,59,7,15123}与A014551号.-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --

添加

-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --添加序列:-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --[2, 5, 15, 35, 91, 203, 491, 1067, 2475, 5291, 11947, 25259, 55979, 117419, 256683, 535211, ...].a(n)=(2^n*(6*n+3-(-1)^n)/4+1)/3;-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --[1, 2, 7, 15, 43, 91, 235, 491, 1195, 2475, 5803, 11947, 27307, 55979, 125611, 256683, 567979, ...].a(n)=(2^n*(3*n-(-1)^n)/4+1)/3;-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --A007494号(n) 模块4[0, 2, 3, 1, 2, 0, 1, 3, 0, 2, 3, 1, 2, 0, 1, 3, 0, 2, 3, 1, 2, 0, 1, 3, 0, 2, 3, 1, 2, 0, 1, ...]? [(n+(n+1)>>1)%4|n<-[0..30]]% [0, 2, 3, 1, 2, 0, 1, 3, 0, 2, 3, 1, 2, 0, 1, 3, 0, 2, 3, 1, 2, 0, 1, 3, 0, 2, 3, 1, 2, 0, 1]? [(3*(n+(n+1)>>1)+1)%4|n<-[0..30]]% [1, 3, 2, 0, 3, 1, 0, 2, 1, 3, 2, 0, 3, 1, 0, 2, 1, 3, 2, 0, 3, 1, 0, 2, 1, 3, 2, 0, 3, 1, 0]-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --d_1mod8(n0,C=1)={我的(n=n0);对于(c=1,c,my(x=6*n+1);而(1!=x%8,x=3*x+1;x>>=估值(x,2));n=x>>3);n-n0;}? 我的(C=8,R=16,n=-1);对于(r=1,r,对于(c=1,c,n++;printf(“%5s|”,d_1mod8(n)));打印());0|    1|   -2|   -1|   -1|   15|   -4|    1|-2|   11|  -10|   -9|   -3|  -11|  -14|    2|-4|   12|  -13|  -11|   -5|  161|  -19|    3|-6|  -25|  -15|  -27|   -7|   45|  -28|    4|-8|   23|  -32|  -33|   -9|   16|  -30|    5|-10|  -15|  -25|  -34|  -11|  -37|  -46|    6|-12|   34|  -36|  -43|  -13|   19|  -54|    7|-14|  -39|  -56|  -56|  -15|   94|  -62|    8|-16|   45|  -64|  -67|  -17|  194|  -68|    9|-18|  -47|  -27|  107|  -19|   33|  -76|   10|-20|   56|  -59|  -48|  -21| 1555|  -74|   11|-22|  -75|  -52|  -89|  -23|  143|  -94|   12|-24|   67|  -78|  -46|  -25|  -29|  -94|   13|-26| -102|   -5| -105|  -27|  154|  -90|   14|-28|   78|  -82| -106|  -29|  551| -115|   15|-30| -113|  -93| -123|  -31|  192| -106|   16|-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --我的(W=40,C=256,R=16,L=0*W);对于(c=L+1,最小值(L+W,c),打印f(“%5s|”,c-1));打印(“\n”);对于(r=1,r,对于(c=L+1,min(L+W,c),my(n=(r-1)*r+c-1);打印f(“%5s|”,如果是(0||((n%4)&&(7!=n%8)&&;打印());-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --的第一个差异A098294号.? alist(N=100)=我的(d0=0);对于(n=0,n,my(d=!!i+logint(3^n,2)-n);打印1(d-d0,“,”);d0=d);? alist();1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1,-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --添加序列:1,1,0,1,1,1,2,0,1,3,3,1,4,7,0,1,5,12,12,0,1,6,18,30,30,1,7,25,55,85,0,1,1,8,33,88,173,173,1,9,42,130,303,476,0,1,10,52,182,485,961,961,0作为三角形:n|k:1|2|3|4|5|6|7|8|。。。--+---+---+---+---+---+---+---+---+---1|  12|  1   03|  1   14|  1   2   05|  1   3   36|  1   4   7   07|  1   5  12  12   08|  1   6  18  30  309|  1   7  25  55  85   010|  1   8  33  88 173 17311|  1   9  42 130 303 476   012|  1  10  52 182 485 961 961   0...L(n)=1+楼层(n*log(3)/log(2))-n。对于n>=1,k>=1、k<=L(n)、T(n,k)=如果。囊性纤维变性。A100982号(行总和)。-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --? [n+1|n<-[0..200],4==登录符(3^(n+2),2)-登录符(2^n,2)]% [6, 11, 18, 23, 30, 35, 42, 47, 52, 59, 64, 71, 76, 83, 88, 95, 100, 105, 112, 117, 124, 129, 136, 141, 148, 153, 158, 165, 170, 177, 182, 189, 194, 201]-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --? my(Tau=2*Pi,s=0);[(s+=n)\陶|n<-[0..24]]% [0, 0, 0, 0, 1, 2, 3, 4, 5, 7, 8, 10, 12, 14, 16, 19, 21, 24, 27, 30, 33, 36, 40, 43, 47]a(n)=楼层((总和{k=0..n}k)/Tau)将长度为n的绳索绕单位圆缠绕时的循环数。-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- --