OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A238660型 人口标准偏差为2的n个分区的数量。 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}](*238659英镑*)
表[计数[g[n],p_/;s[p]==2],{n,z}](*A238660型*)
表[Count[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](*让-弗朗索瓦·奥尔科弗2021年6月3日之后阿洛伊斯·海因茨*)
交叉参考
关键词
非n,容易的
作者
克拉克·金伯利2014年3月3日
扩展
a(51)-a(71)来自阿洛伊斯·海因茨2014年3月11日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月6日04:28。包含373115个序列。(在oeis4上运行。)