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

 


A194924号
将{1,2,…,n}划分为两个子集A,B的集合数,使得|A|和|B|的最大公约数=1。
2
1, 3, 4, 15, 6, 63, 64, 171, 130, 1023, 804, 4095, 2380, 7920, 16384, 65535, 40410, 262143, 246640, 582771, 695860, 4194303, 2884776, 13455325, 11576916, 44739243, 65924824, 268435455, 176422980, 1073741823, 1073741824, 2669774811, 3128164186, 11421338075
抵消
2,2
评论
a(p)=2^(p-1)-1=S2(p,2),其中p是素数,S2(n,k)是第二类斯特林数。
a(n)是x^n/n的系数!在B(A(x))的泰勒级数展开式中,其中A(x!B(x)=x^2/2!。
链接
阿洛伊斯·海因茨,n=2..1000时的n,a(n)表
MAPLE公司
a: =n->`如果`(n=2,1,加上(`如果'(igcd(k,n-k)=1,
二项式(n,k),0),k=1..iquo(n,2)):
seq(a(n),n=2..50)#阿洛伊斯·海因茨2011年11月2日
数学
f[list_]:=x^First[list]/First[list]+x^Last[list]/Last[list]!;
前缀[Table[a=Total[Map[f,Select[Integer Partitions[n,2],Apply[GCD,#]==1&]]];最后一个[范围[0,n]!系数列表[序列[a^2/2!,{x,0,n}],x]],{n,3,30}],1]
(*第二个节目:*)
a[n_]:=如果[n==2,1,和[If[GCD[k,n-k]==1,二项式[n,k],0],{k,1,商[n,2]}];
a/@范围[2,50](*Jean-François Alcover公司2021年6月9日之后阿洛伊斯·海因茨*)
交叉参考
关键词
非n
作者
杰弗里·克雷策2011年10月12日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年9月21日19:38。包含376089个序列。(在oeis4上运行。)