登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: a238616-编号:a238626
显示找到的17个结果中的1-10个。 第页12
    排序:关联|参考文献||被改进的|创建     格式:长的|短的|数据
A238662型 总体标准偏差大于等于2的n个分区的数量。 +10
9
0, 0, 0, 0, 0, 1, 1, 3, 5, 9, 12, 20, 29, 43, 62, 88, 118, 169, 223, 306, 403, 532, 693, 907, 1160, 1490, 1910, 2423, 3044, 3845, 4783, 5957, 7401, 9104, 11209, 13805, 16806, 20449, 24920, 30223, 36494, 44022, 52880, 63511, 76003, 90631, 108088, 128708 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,8
评论
关于“总体标准偏差”,请参阅A238616型.
链接
配方奶粉
a(n)+A238658型(n)=A000041号(n) ●●●●。
例子
共有22个8分区,其总体标准偏差由这些近似值给出:0.,3.,2.,2.35702,1.,1.69967,1.73205,0.,1.24722,0.942809,1.22474,1.2,0.471405,1.,0.707107,0.8,0.745356,0。
MAPLE公司
b: =proc(n,i,m,s,c)`if`(n=0,`if'(s/c-(m/c)^2>=4,1,0),
`如果`(i=1,b(0$2,m+n,s+n,c+n),加上(b(n-i*j,i-1,
m+i*j,s+i^2*j,c+j),j=0..n/i))
结束时间:
a: =n->b(n$2,0$3):
seq(a(n),n=1..50)#阿洛伊斯·海因茨2014年3月11日
数学
z=50;g[n_]:=g[n]=整数分区[n];c[t]:=c[t]=长度[t];s[t_]:=s[t]=Sqrt[Sum[(t[[k]]-平均值[t])^2,{k,1,c[t]}]/c[t]];
表[计数[g[n],p_/;s[p]<2],{n,z}](*A238658型*)
表[计数[g[n],p_/;s[p]<=2],{n,z}](*A238659型*)
表[计数[g[n],p_/;s[p]==2],{n,z}](*A238660型*)
表[计数[g[n],p_/;s[p]>2],{n,z}](*A238661型*)
表[计数[g[n],p_/;s[p]>=2],{n,z}](*A238662型*)
t[n_]:=t[n]=n[表[s[g[n][k]]],{k,1,分区P[n]}]
ListPlot[Sort[t[30]]](*30*分区的st偏差图)
(*第二个节目:*)
b[n_,i_,m_,s_,c]:=b[n,i,m,s,c]=如果[n==0,如果[s/c-(m/c)^2>=4,1,0],如果[i==1,b[0,0,m+n,s+n,c+n],总和[b[n-i*j,i-1,m+i*j、s+i^2*j,c+j],{j,0,n/i}]];
a[n]:=b[n,n,0,0,0];
数组[a,50](*Jean-François Alcover公司2021年5月27日之后阿洛伊斯·海因茨*)
交叉参考
关键字
非n
作者
克拉克·金伯利2014年3月3日
状态
经核准的
A238619型 总体标准偏差>1的n个分区的数量。 +10
8
0, 0, 0, 0, 1, 2, 5, 8, 15, 22, 33, 47, 68, 93, 132, 176, 239, 314, 412, 536, 693, 884, 1131, 1427, 1803, 2249, 2808, 3489, 4321, 5325, 6552, 8022, 9799, 11913, 14456, 17502, 21136, 25457, 30588, 36673, 43869, 52398, 62437, 74277, 88186, 104526, 123670, 146028 (列表;图表;参考;;历史;文本;内部格式)
抵消
1, 6
评论
关于“标准偏差”,请参阅A238616型.
链接
配方奶粉
a(n)+A238617型(n)=A000041号(n) ●●●●。
例子
共有11个6的分区,其标准偏差由这些近似值给出:0.、2.、1.、1.41421、0.、0.816497、0.866025、0.,0.5、0.4、0,因此a(6)=2。
MAPLE公司
b: =proc(n,i,m,s,c)`if`(n=0,`if'(s/c-(m/c)^2>1,1,0),
`如果`(i=1,b(0$2,m+n,s+n,c+n),加上(b(n-i*j,i-1,
m+i*j,s+i^2*j,c+j),j=0..n/i))
结束时间:
a: =n->b(n$2,0$3):
seq(a(n),n=1..50)#阿洛伊斯·海因茨2014年3月11日
数学
z=55;g[n_]:=g[n]=整数分区[n];s[t_]:=s[t]=Sqrt[Sum[(t[[k]]-平均值[t])^2,{k,1,长度[t]}]/长度[t]
表[计数[g[n],p_/;s[p]<1],{n,z}](*A238616型*)
表[计数[g[n],p_/;s[p]<=1],{n,z}](*A238617型*)
表[计数[g[n],p_/;s[p]==1],{n,z}](*238618英镑*)
表[计数[g[n],p_/;s[p]>1],{n,z}](*A238619型*)
表[计数[g[n],p_/;s[p]>=1],{n,z}](*A238620型*)
t[n_]:=t[n]=n[表[s[g[n][k]]],{k,1,分区P[n]}]
ListPlot[Sort[t[30]]](*30*分区的st.dev图)
(*第二个节目:*)
b[n_,i_,m_,s_,c]:=b[n,i,m,s,c]=如果[n==0,
如果[s/c-(m/c)^2>1,1,0],如果[i==1,b[0,0,m+n,s+n,c+n],
求和[b[n-i*j,i-1,m+i*j,s+i^2*j,c+j],{j,0,n/i}]];
a[n]:=b[n,n,0,0,0];
数组[a,50](*Jean-François Alcover公司,2021年6月3日,之后阿洛伊斯·海因茨*)
交叉参考
囊性纤维变性。A238616型.
关键字
非n,容易的
作者
克拉克·金伯利2014年3月1日
状态
经核准的
A238620型 总体标准偏差大于等于1的n个分区的数量。 +10
8
0, 0, 0, 1, 1, 3, 5, 10, 15, 23, 33, 52, 68, 94, 132, 180, 239, 318, 412, 543, 693, 885, 1131, 1443, 1803, 2250, 2808, 3499, 4321, 5336, 6552, 8032, 9799, 11914, 14456, 17528, 21136, 25458, 30588, 36699, 43869, 52422, 62437, 74290, 88186, 104527, 123670 (列表;图表;参考;;历史;文本;内部格式)
抵消
1, 6
评论
关于“标准偏差”,请参阅A238616型.
链接
配方奶粉
a(n)=A000041号(n)-A238616型(n) ●●●●。
例子
共有11个6的分区,其标准偏差由这些近似值给出:0.、2.、1.、1.41421、0.、0.816497、0.866025、0.,0.5、0.4、0,因此a(6)=3。
MAPLE公司
b: =proc(n,i,m,s,c)`if`(n=0,`if'(s/c-(m/c)^2>=1,1,0),
`如果`(i=1,b(0$2,m+n,s+n,c+n),加上(b(n-i*j,i-1,
m+i*j,s+i^2*j,c+j),j=0..n/i))
结束时间:
a: =n->b(n$2,0$3):
seq(a(n),n=1..50)#阿洛伊斯·海因茨2014年3月11日
数学
z=55;g[n_]:=g[n]=整数分区[n];s[t_]:=s[t]=Sqrt[Sum[(t[[k]]-平均值[t])^2,{k,1,长度[t]}]/长度[t]
表[计数[g[n],p_/;s[p]<1],{n,z}](*A238616型*)
表[计数[g[n],p_/;s[p]<=1],{n,z}](*A238617型*)
表[计数[g[n],p_/;s[p]==1],{n,z}](*238618英镑*)
表[计数[g[n],p_/;s[p]>1],{n,z}](*A238619型*)
表[计数[g[n],p_/;s[p]>=1],{n,z}](*A238620型*)
t[n_]:=t[n]=n[表[s[g[n][k]]],{k,1,分区P[n]}]
ListPlot[Sort[t[30]]](*30*分区的st.dev图)
(*第二个节目:*)
b[n_,i_,m_,s_,c]:=b[n,i,m,s,c]=如果[n==0,
如果[s/c-(m/c)^2>=1,1,0],如果[i==1,b[0,0,m+n,s+n,c+n],
求和[b[n-i*j,i-1,m+i*j,s+i^2*j,c+j],{j,0,n/i}]];
a[n]:=b[n,n,0,0,0];
数组[a,50](*Jean-François Alcover公司,2021年6月3日,之后阿洛伊斯·海因茨*)
交叉参考
囊性纤维变性。A238616型.
关键字
非n,容易的
作者
克拉克·金伯利2014年3月1日
状态
经核准的
A238658型 总体标准偏差<2的n的分区数。 +10
8
1, 2, 3, 5, 7, 10, 14, 19, 25, 33, 44, 57, 72, 92, 114, 143, 179, 216, 267, 321, 389, 470, 562, 668, 798, 946, 1100, 1295, 1521, 1759, 2059, 2392, 2742, 3206, 3674, 4172, 4831, 5566, 6265, 7115, 8089, 9152, 10381, 11664, 13131, 14927, 16666, 18565, 20977 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
链接
配方奶粉
a(n)+A238662型(n)=A000041号(n) ●●●●。
例子
共有22个8分区,其总体标准偏差由这些近似值给出:0.,3.,2.,2.35702,1.,1.69967,1.73205,0.,1.24722,0.942809,1.22474,1.2,0.471405,1.,0.707107,0.8,0.745356,0。
数学
z=50;g[n_]:=g[n]=整数分区[n];c[t]:=c[t]=长度[t];s[t_]:=s[t]=Sqrt[Sum[(t[[k]]-平均值[t])^2,{k,1,c[t]}]/c[t]];
表[计数[g[n],p_/;s[p]<2],{n,z}](*A238658型*)
表[计数[g[n],p_/;s[p]<=2],{n,z}](*A238659型*)
表[计数[g[n],p_/;s[p]==2],{n,z}](*A238660型*)
表[计数[g[n],p_/;s[p]>2],{n,z}](*A238661型*)
表[计数[g[n],p_/;s[p]>=2],{n,z}](*A238662型*)
t[n_]:=t[n]=n[表[s[g[n][k]]],{k,1,分区P[n]}]
ListPlot[Sort[t[30]]](*30*分区的st偏差图)
(*第二个节目:*)
b[n_,i_,m_,s_,c]:=b[n,i,m,s,c]=如果[n==0,如果[s/c-(m/c)^2>=4,1,0],如果[i==1,b[0,0,m+n,s+n,c+n],总和[b[n-i*j,i-1,m+i*j、s+i^2*j,c+j],{j,0,n/i}]];
a[n_]:=分区P[n]-b[n,n,0,0,0];
数组[a,50](*Jean-François Alcover公司2021年5月27日之后阿洛伊斯·海因茨*)
交叉参考
关键字
非n,容易的
作者
克拉克·金伯利2014年3月3日
状态
经核准的
A238660型 人口标准偏差为2的n个分区的数量。 +10
8
0, 0, 0, 0, 0, 1, 0, 1, 0, 2, 0, 2, 0, 1, 1, 3, 0, 5, 0, 7, 4, 2, 0, 19, 3, 2, 9, 20, 0, 38, 0, 22, 33, 7, 12, 84, 0, 8, 52, 90, 0, 127, 0, 87, 103, 22, 0, 304, 9, 74, 131, 153, 0, 214, 139, 390, 192, 59, 0, 1219, 0, 73, 460, 372, 383, 908, 0, 501, 439, 832, 0 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,10
评论
关于“标准偏差”,请参阅A238616型.
链接
例子
有22个8的分区,其标准偏差由这些近似值给出:0.,3.,2.,2.35702,1.,1.69967,1.73205,0.,1.24722,0.942809,1.22474,1.2,0.471405,1.,0.707107,0.8,0.745356,0。
MAPLE公司
b: =proc(n,i,m,s,c)`if`(n=0,`if'(s/c-(m/c)^2=4,1,0),
`如果`(i=1,b(0$2,m+n,s+n,c+n),加上(b(n-i*j,i-1,
m+i*j,s+i^2*j,c+j),j=0..n/i))
结束时间:
a: =n->b(n$2,0$3):
seq(a(n),n=1..50)#阿洛伊斯·海因茨2014年3月11日
数学
z=50;g[n_]:=g[n]=整数分区[n];c[t]:=c[t]=长度[t];s[t_]:=s[t]=Sqrt[Sum[(t[[k]]-平均值[t])^2,{k,1,c[t]}]/c[t]];
表[计数[g[n],p_/;s[p]<2],{n,z}](*A238658型*)
表[计数[g[n],p_/;s[p]<=2],{n,z}](*A238659型*)
表[计数[g[n],p_/;s[p]==2],{n,z}](*A238660型*)
表[计数[g[n],p_/;s[p]>2],{n,z}](*A238661型*)
表[计数[g[n],p_/;s[p]>=2],{n,z}](*A238662型*)
t[n_]:=t[n]=n[表[s[g[n][k]]],{k,1,分区P[n]}]
ListPlot[Sort[t[30]]](*30*分区的st偏差图)
(*第二个节目:*)
b[n_,i_,m_,s_,c]:=b[n,i,m,s,c]=如果[n==0,
如果[s/c-(m/c)^2==4,1,0],如果[i==1,b[0,0,m+n,s+n,c+n],
求和[b[n-i*j,i-1,m+i*j,s+i^2*j,c+j],{j,0,n/i}]];
a[n]:=b[n,n,0,0,0];
数组[a,50](*Jean-François Alcover公司,2021年6月3日,之后阿洛伊斯·海因茨*)
交叉参考
关键字
非n,容易的
作者
克拉克·金伯利2014年3月3日
扩展
a(51)-a(71)来自阿洛伊斯·海因茨2014年3月11日
状态
经核准的
A238661型 标准偏差σ>2的n的分区数。 +10
8
0, 0, 0, 0, 0, 0, 1, 2, 5, 7, 12, 18, 29, 42, 61, 85, 118, 164, 223, 299, 399, 530, 693, 888, 1157, 1488, 1901, 2403, 3044, 3807, 4783, 5935, 7368, 9097, 11197, 13721, 16806, 20441, 24868, 30133, 36494, 43895, 52880, 63424, 75900, 90609, 108088, 128404 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,8
评论
关于“标准偏差”,请参阅A238616型.
链接
配方奶粉
a(n)+A238659型(n)=A000041号(n) ●●●●。
例子
有22个8的分区,其标准偏差由这些近似值给出:0.,3.,2.,2.35702,1.,1.69967,1.73205,0.,1.24722,0.942809,1.22474,1.2,0.471405,1.,0.707107,0.8,0.745356,0。
数学
z=50;g[n_]:=g[n]=整数分区[n];c[t]:=c[t]=长度[t];s[t_]:=s[t]=Sqrt[Sum[(t[[k]]-平均值[t])^2,{k,1,c[t]}]/c[t]];
表[计数[g[n],p_/;s[p]<2],{n,z}](*A238658型*)
表[计数[g[n],p_/;s[p]<=2],{n,z}](*A238659型*)
表[计数[g[n],p_/;s[p]==2],{n,z}](*A238660型*)
表[计数[g[n],p_/;s[p]>2],{n,z}](*A238661型*)
表[计数[g[n],p_/;s[p]>=2],{n,z}](*A238662型*)
t[n_]:=t[n]=n[表[s[g[n][k]]],{k,1,分区P[n]}]
ListPlot[Sort[t[30]]](*30*分区的st偏差图)
交叉参考
关键字
非n,容易的
作者
克拉克·金伯利2014年3月3日
状态
经核准的
A238617型 标准偏差σ<=1的n的分区数。 +10
5
1, 2, 3, 5, 6, 9, 10, 14, 15, 20, 23, 30, 33, 42, 44, 55, 58, 71, 78, 91, 99, 118, 124, 148, 155, 187, 202, 229, 244, 279, 290, 327, 344, 397, 427, 475, 501, 558, 597, 665, 714, 776, 824, 898, 948, 1032, 1084, 1245, 1308, 1395, 1452, 1606, 1692, 1807, 1919 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
关于“标准偏差”,请参阅A238616型.
链接
配方奶粉
a(n)+A238619型(n)=A000041号(n) ●●●●。
例子
共有11个6的分区,其标准偏差由这些近似值给出:0.、2.、1.、1.41421、0.、0.816497、0.866025、0.,0.5、0.4、0,因此a(6)=9。
MAPLE公司
b: =proc(n,i,m,s,c)`if`(n=0,`if'(s/c-(m/c)^2<=1,1,0),
`如果`(i=1,b(0$2,m+n,s+n,c+n),加上(b(n-i*j,i-1,
m+i*j,s+i^2*j,c+j),j=0..n/i))
结束时间:
a: =n->b(n$2,0$3):
seq(a(n),n=1..50)#阿洛伊斯·海因茨2014年3月11日
数学
z=55;g[n_]:=g[n]=整数分区[n];s[t_]:=s[t]=Sqrt[Sum[(t[[k]]-平均值[t])^2,{k,1,长度[t]}]/长度[t]
表[计数[g[n],p_/;s[p]<1],{n,z}](*A238616型*)
表[计数[g[n],p_/;s[p]<=1],{n,z}](*A238617型*)
表[计数[g[n],p_/;s[p]==1],{n,z}](*238618英镑*)
表[计数[g[n],p_/;s[p]>1],{n,z}](*A238619型*)
表[计数[g[n],p_/;s[p]>=1],{n,z}](*A238620型*)
t[n_]:=t[n]=n[表[s[g[n][k]]],{k,1,分区P[n]}]
ListPlot[Sort[t[30]]](*30*分区的st.dev图)
b[n_,i_,m_,s_,c]:=b[n,i,m,s,c]=如果[n==0,如果[s/c-(m/c)^2<=1,1,0],如果[i==1,b[0,0,m+n,s+n,c+n],总和[b[n-i*j,i-1,m+i*j、s+i^2*j,c+j],{j,0,n/i}]];a[n]:=b[n,n,0,0,0];表[a[n],{n,1,50}](*Jean-François Alcover公司2015年11月16日,之后阿洛伊斯·海因茨*)
交叉参考
囊性纤维变性。A238616型.
关键字
非n,容易的
作者
克拉克·金伯利2014年3月1日
状态
经核准的
238618英镑 标准偏差σ=1的n的分区数。 +10
5
0, 0, 0, 1, 0, 1, 0, 2, 0, 1, 0, 5, 0, 1, 0, 4, 0, 4, 0, 7, 0, 1, 0, 16, 0, 1, 0, 10, 0, 11, 0, 10, 0, 1, 0, 26, 0, 1, 0, 26, 0, 24, 0, 13, 0, 1, 0, 60, 0, 5, 0, 17, 0, 19, 0, 52, 0, 1, 0, 117, 0, 1, 0, 36, 0, 46, 0, 23, 0, 29, 0, 160, 0, 1, 0, 30, 0, 61, 0, 140 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,8
评论
关于“标准偏差”,请参阅A238616型.
链接
例子
共有11个6的分区,其标准偏差由这些近似值给出:0.、2.、1.、1.41421、0.、0.816497、0.866025、0.,0.5、0.4、0,因此a(6)=1。
MAPLE公司
b: =proc(n,i,m,s,c)`if`(n=0,`if'(s/c-(m/c)^2=1,1,0),
`如果`(i=1,b(0$2,m+n,s+n,c+n),加上(b(n-i*j,i-1,
m+i*j,s+i^2*j,c+j),j=0..n/i))
结束时间:
a: =n->b(n$2,0$3):
seq(a(n),n=1..50)#阿洛伊斯·海因茨2014年3月11日
数学
z=55;g[n_]:=g[n]=整数分区[n];s[t_]:=s[t]=Sqrt[Sum[(t[[k]]-平均值[t])^2,{k,1,长度[t]}]/长度[t]
表[计数[g[n],p_/;s[p]<1],{n,z}](*A238616型*)
表[计数[g[n],p_/;s[p]<=1],{n,z}](*A238617型*)
表[计数[g[n],p_/;s[p]==1],{n,z}](*238618英镑*)
表[计数[g[n],p_/;s[p]>1],{n,z}](*A238619型*)
表[计数[g[n],p_/;s[p]>=1],{n,z}](*A238620型*)
t[n_]:=t[n]=n[表[s[g[n][k]]],{k,1,分区P[n]}]
ListPlot[Sort[t[30]]](*30*分区的st.dev图)
b[n_,i_,m_,s_,c]:=b[n,i,m,s,c]=如果[n==0,如果[s/c-(m/c)^2==1,1,0],如果[i==1,b[0,0,m+n,s+n,c+n],总和[b[n-i*j,i-1,m+i*j、s+i^2*j,c+j],{j,0,n/i}]];a[n]:=b[n,n,0,0,0];表[a[n],{n,1,50}](*Jean-François Alcover公司2015年11月16日,之后阿洛伊斯·海因茨*)
交叉参考
囊性纤维变性。A238616型.
关键字
非n,容易的
作者
克拉克·金伯利2014年3月1日
扩展
a(56)-a(80)来自阿洛伊斯·海因茨2014年3月11日
状态
经核准的
A238659型 标准偏差σ<=2的n的分区数。 +10
5
1, 2, 3, 5, 7, 11, 14, 20, 25, 35, 44, 59, 72, 93, 115, 146, 179, 221, 267, 328, 393, 472, 562, 687, 801, 948, 1109, 1315, 1521, 1797, 2059, 2414, 2775, 3213, 3686, 4256, 4831, 5574, 6317, 7205, 8089, 9279, 10381, 11751, 13234, 14949, 16666, 18869, 20986 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
关于“标准偏差”,请参阅A238616型.
链接
配方奶粉
a(n)+A238661型(n)=A000041号(n) ●●●●。
例子
有22个8分区,其标准偏差由以下近似值给出:0.,3.,2.,2.35702,1.,1.69967,1.73205,0.,1.24722,0.942809,1.22474,1.2,0.471405,1.,0.707107,0.8,0.745356,0.,0.48989898,0.471405,0.349927,0,因此a(8)=20。
数学
z=50;g[n_]:=g[n]=整数分区[n];c[t]:=c[t]=长度[t];s[t_]:=s[t]=Sqrt[Sum[(t[[k]]-平均值[t])^2,{k,1,c[t]}]/c[t]];
表[计数[g[n],p_/;s[p]<2],{n,z}](*A238658型*)
表[计数[g[n],p_/;s[p]<=2],{n,z}](*A238659型*)
表[计数[g[n],p_/;s[p]==2],{n,z}](*A238660型*)
表[计数[g[n],p_/;s[p]>2],{n,z}](*A238661型*)
表[计数[g[n],p_/;s[p]>=2],{n,z}](*A238662型*)
t[n_]:=t[n]=n[表[s[g[n][k]]],{k,1,分区P[n]}]
ListPlot[Sort[t[30]]](*30*分区的st偏差图)
交叉参考
关键字
非n,容易的
作者
克拉克·金伯利2014年3月3日
状态
经核准的
A239140型 标准偏差σ<1的n的严格分区数。 +10
5
1, 1, 2, 1, 2, 2, 2, 1, 3, 1, 2, 2, 2, 1, 3, 1, 2, 2, 2, 1, 3, 1, 2, 2, 2, 1, 3, 1, 2, 2, 2, 1, 3, 1, 2, 2, 2, 1, 3, 1, 2, 2, 2, 1, 3, 1, 2, 2, 2, 1, 3, 1, 2, 2, 2, 1, 3, 1, 2, 2, 2, 1, 3, 1, 2, 2, 2, 1, 3, 1, 2, 2, 2, 1, 3, 1, 2, 2, 2, 1, 3, 1, 2, 2, 2, 1 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,3
评论
关于标准偏差,请参阅A238616型.
链接
安蒂·卡图恩,n=1..10005的n,a(n)表
常系数线性递归的索引项,签名(-1,0,1,1)。
配方奶粉
a(n+3)=A083039美元(n) 对于n>=1(周期为6);a(n)+A239143型(n)=A000009号(n) 对于n>=1。
G.f.:-(x^6+x^5+x^4+2*x^3+3*x^2+2*x+1)*x/((x-1)*(x+1)*(x^2+x+1))-阿洛伊斯·海因茨2014年3月14日
例子
严格分区9的标准偏差为0.、3.5、2.5、1.5、2.16025、0.5、1.63299、0.816497,因此a(9)=3。
数学
z=30;g[n_]:=选择[IntegerPartitions[n],最大[Length/@Split@#]==1&];s[t_]:=s[t]=Sqrt[Sum[(t[[k]]-平均值[t])^2,{k,1,长度[t]}]/长度[t]
表[计数[g[n],p_/;s[p]<1],{n,z}](*A239140型*)
表[计数[g[n],p_/;s[p]<=1],{n,z}](*A239141号*)
表[计数[g[n],p_/;s[p]==1],{n,z}](*周期01*)
表[计数[g[n],p_/;s[p]>1],{n,z}](*A239142型*)
表[计数[g[n],p_/;s[p]>=1],{n,z}](*A239143型*)
t[n_]:=t[n]=n[表[s[g[n][k]]],{k,1,分区Q[n]}]
ListPlot[Sort[t[30]]](*严格分区的st.dev的plot为30*)
(*彼得·J·C·摩西2014年3月3日*)
联接[{1,1,2},LinearRecurrence[{-1,0,1,1},{1,2,2},83]](*雷·钱德勒2015年8月25日*)
黄体脂酮素
(PARI)
A083039美元(n) =(1+!(n%2)+!(n%3);
A239140型(n) =如果(n<=3,A083039美元(n-3))\\安蒂·卡图恩2021年5月24日
交叉参考
第k列=第0列,共列A239228型.
关键字
非n,容易的
作者
克拉克·金伯利2014年3月11日
扩展
第一个公式中的A数由修正安蒂·卡图恩2021年5月24日
状态
经核准的
第页12

搜索在0.015秒内完成

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新的seq。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

最后修改时间:美国东部时间2024年6月21日05:25。包含373540个序列。(在oeis4上运行。)