登录
OEIS基金会得到了OEIS用户的捐赠和西蒙斯基金会的资助。

 

标志


提示
(问候来自整数序列在线百科全书!)
A212148号 三角数组:T(n,k)是{1,…,n}的k元子集的数目,使得平均值(S)不等于中值(S)。 1
0,0,0,0,0,0,0,0,0,0,0,0,2,0,0,0,0,6,2,0,0,0,14,8,8,4,4,0,0,0,0,0,26,22,16,4,0,0,0,0,0,0,48,46,20,44,48,46,20,6,6,0,0,0,0,100,160,0,0,100,160,0,222,174174,106,36,36,8,8,8,8,8,8,8,8,10,0,0,0,0,0,0,0,0,100,190,720720720 810 810,810,66,30 30 30,30,30,60,80,728440个 (列表;桌子;图表;参考文献;;历史;文本;内部格式)
抵消

1,9个

评论

行总和:A212140号.

链接

n=1..74的n,a(n)表。

例子

前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[#]==Mean[#]&,子集[Range[n],{k}]],假]

展平[表[t[n,k],{n,1,12},{k,1,n}]]

TableForm[表[t[n,k],{n,1,12},{k,1,n}]]

s[n_x]:=和[t[n,k],{k,1,n}]

表[s[n],{n,1,20}](*A212140号*)

%/二(*A212149号*)

(*彼得·J·C·摩西2012年5月1日*)

交叉引用

囊性纤维变性。A212139号.

上下文顺序:A158360 A309746飞机 A094315*A336563飞机 A048146号 A334045

相邻序列:A212145号 A212146号 A212147号*A212149号 A212150型 A212151号

关键字

,

作者

克拉克·金伯利2012年5月6日

状态

经核准的

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

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

上次修改时间:2021年10月28日12:39。包含348329个序列。(运行在oeis4上。)