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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A052112号 n个节点上的自互补有向2-多重图的个数。
1, 2, 14, 159, 7629, 599456, 226066304, 139178815861, 410179495378288, 2055126126323159298, 48234291396964332998082, 2016523952125103590736221923, 382812826011951187177138562992638, 135681830960694827549160289095792266106 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
二重图类似于普通图,只是任意两个节点之间有0、1或2条边(不允许自循环)。
链接
安德鲁·豪罗伊德,n=1..50时的n,a(n)表
数学
permcount[v_List]:=模块[{m=1,s=0,k=0,t},对于[i=1,i<=长度[v],i++,t=v[i]];k=如果[i>1&&t==v[[i-1]],k+1,1];m*=t*k;s+=t];s/m] ;
edges[v_List]:=2 Sum[Sum[If[EvenQ[v[[i]]v[[j]],GCD[v[[i]],v[[j]],0],{j,1,i-1}],{i,2,Length[v]}]+Sum[If[EvenQ[v[[i]],v[[i]]-1,0],{i,1,Length[v]}];
a[n_]:=模块[{s=0},Do[s+=permcount[p]*3^edges[p],{p,IntegerPartitions[n]}];序号!];
数组[a,25](*Jean-François Alcover公司2019年9月12日之后安德鲁·霍罗伊德*)
黄体脂酮素
(PARI)
permcount(v)={my(m=1,s=0,k=0,t);对于(i=1,#v,t=v[i];k=if(i>1&&t==v[i-1],k+1,1);m*=t*k;s+=t);s!/m}
边(v)={2*sum(i=2,#v,sum(j=1,i-1,if(v[i]*v[j]%2==0,gcd(v[i],v[j]))+和(i=1,#v,if
a(n)={my(s=0);对于部分(p=n,s+=permcount(p)*3^边(p));s/n!}\\安德鲁·霍罗伊德2018年9月16日
交叉参考
囊性纤维变性。A053467号,A003086号,A053588号.
关键词
非n
作者
扩展
条款a(14)及其后安德鲁·霍罗伊德2018年9月16日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年3月19日06:52。包含370953个序列。(在oeis4上运行。)