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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A212148型 三角数组:T(n,k)是{1,…,n}的k元素子集S的数目,使得平均值(S)不等于中值(S)。 1
0, 0, 0, 0, 0, 0, 0, 0, 2, 0, 0, 0, 6, 2, 0, 0, 0, 14, 8, 4, 0, 0, 0, 26, 22, 16, 4, 0, 0, 0, 44, 48, 46, 20, 6, 0, 0, 0, 68, 92, 108, 66, 30, 6, 0, 0, 0, 100, 160, 222, 174, 106, 36, 8, 0, 0, 0, 140, 260, 414, 396, 298, 142, 48, 8, 0, 0, 0, 190, 400, 720, 810, 728, 440 (列表;桌子;图表;参考文献;;历史;文本;内部格式)
抵消
1,9
评论
行总和:A212140型.
链接
例子
前7行:
0
0...0
0…0…0
0...0...2....0
0…0…6…2…0
0...0...14...8....4...0
0...0...26...22...16...4...0
T(5,3)计数的子集为{1,2,4}、{1,2,5}、}1,3,4},{1,4,5},}2,3,5},{2,4,5{。
数学
t[n_,k_]:=t[n,k]=计数[Map[Median[#]==平均值[#]&,子集[Range[n],{k}]],False]
扁平[表[t[n,k],{n,1,12},{k,1,n}]]
表格形式[表格[t[n,k],{n,1,12},{k,1,n}]]
s[n]:=总和[t[n,k],{k,1,n}]
表[s[n],{n,1,20}](*A212140型*)
%/2 (*A212149型*)
(*彼得·J·C·摩西2012年5月1日*)
交叉参考
囊性纤维变性。A212139型.
关键词
非n,表格
作者
克拉克·金伯利2012年5月6日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年5月14日17:50。包含372533个序列。(在oeis4上运行。)