A238616-组织环境信息系统

A238616型

标准偏差σ<1的n的分区数。

1, 2, 3, 4, 6, 8, 10, 12, 15, 19, 23, 25, 33, 41, 44, 51, 58, 67, 78, 84, 99, 117, 124, 132, 155, 186, 202, 219, 244, 268, 290, 317, 344, 396, 427, 449, 501, 557, 597, 639, 714, 752, 824, 885, 948, 1031, 1084, 1185, 1308, 1390, 1452, 1589, 1692, 1788, 1919 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1,2`
	评论	`这里，“标准差”是指“总体标准差”（用σ表示），而不是“样本标准差”（用s表示）；σ是方差的平方根，因此列表t=（t（k））的σ，例如正整数的分区，由公式sqrt（（总和[（t（k）-平均值（t））^2:k=1..#t）/（#t））给出，其中#t是t（k（大多数概率和统计学教科书都讨论了σ和s之间的区别。Mathematica中的命令“StandardDeviation”给出的是s，而不是σ。）`
	链接	`n=1..55时的n、a（n）表。`
	配方奶粉	`a（n）=A000041号（n）-A238620型（n） ●●●●。`
	例子	`共有11个6的分区，其标准偏差由这些近似值给出：0.、2.、1.、1.41421、0.、0.816497、0.866025、0.，0.5、0.4、0，因此a（6）=8。`
	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-ij，i-1， `m+ij，s+i^2*j，c+j），j=0..n/i））` `结束时间：` `a： =n->b（n$2,0$3）：` `seq（a（n），n=1..55）#阿洛伊斯·海因茨2014年3月12日`
	数学	`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}](A238618型)` `表[计数[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]}]]列表图[Sort[t[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-ij，i-1，m+ij，s+i^2j，c+j]，{j，0，n/i}]]；a[n_]：=b[n，n，0，0，0]；表[a[n]，{n，1，55}](Jean-François Alcover公司2015年11月20日，之后阿洛伊斯·海因茨)` `（第三个程序的目的只是展示如何使用Mathematica的StandardDeviation和校正因子来计算sigma，即总体标准偏差。）` `sigma[t]：=如果[长度[t]==1，0，标准偏差[t]Sqrt[（长度[t]-1）/长度[t']]；` `a[n_]：=计数[IntegerPartitions[n]，p_/；西格玛[p]<1]；` `数组[a，30](Jean-François Alcover公司2021年5月28日）`
	交叉参考	`囊性纤维变性。A238617型-A238620型，A238655型-A238662型.` `第k列=第0列，共列A239223型.` `上下文中的序列：A005705号 139542英镑 A347656型A302833型 A093717号 A359754型` `相邻序列：A238613型 A238614型 A238615型A238617型 238618英镑 A238619型`
	关键词	`非n，容易的`
	作者	`克拉克·金伯利2014年3月1日`
	状态	`经核准的`