|
| |
|
| A007719号 |
| n阶对称矩阵的独立多项式不变量个数。 |
|
12
|
|
|
|
1, 2, 4, 11, 30, 95, 328, 1211, 4779, 19902, 86682, 393072, 1847264, 8965027, 44814034, 230232789, 1213534723, 6552995689, 36207886517, 204499421849, 1179555353219, 6942908667578, 41673453738272, 254918441681030, 1588256152307002, 10073760672179505
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,2
|
|
|
评论
|
此外，具有n条边（允许循环）和任意数量节点的连接多重图的数量。
还有{1，1，2，2，3，3，…，n，n}的非同构连通多集划分的个数-古斯·怀斯曼2018年7月18日
|
|
|
链接
|
R.J.Mathar，关于小图的统计，arXiv:1709.09000[math.CO]（2017）表63。
|
|
|
配方奶粉
|
|
|
|
例子
|
{1，1，2，2，3，3}的a（3）=11连通多集划分的非同构代表：
(112233),
(1)(12233), (12)(1233), (112)(233), (123)(123),
(1)(2)(1233), (1)(12)(233), (1)(23)(123), (12)(13)(23),
(1)(2)(3)(123), (1)(2)(13)(23).
（结束）
|
|
|
数学
|
mob[m_，n_]：=如果[Mod[m，n]==0，MoebiusMu[m/n]，0]；
EULERi[b_]：=模[{a，c，i，d}，c={}；对于[i=1，i<=长度[b]，i++，
c=追加[c，i*b[[i]]-总和[c[[d]]*b[i-d]]，{d，1，i-1}]]；a={}；
对于[i=1，i<=长度[b]，i++，a=Append[a，（1/i）*Sum[mob[i，d]*c[[d]]，{d，1，i}]]；返回[a]]；
permcount[v_]：=模[{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] ；
Kq[q_，t_，k_]：=系列系数[1/乘积[g=GCD[t，q[[j]]]；（1-x^（q[[j]]/g）^g，{j，1，长度[q]}]，{x，0，k}]；
RowSumMats[n_，m_，k_]：=模块[{s=0}，Do[s+=permcount[q]*SeriesCoefficient[Exp[Sum[Kq[q，t，k]/t x^t，{t，1，n}]]，{x，0，n}]，{q，Integer Partitions[m]}]；s/m！]；
A007717号=表格[打印[n]；RowSumMats[n，2n，2]，{n，0，20}]；
|
|
|
交叉参考
|
囊性纤维变性。A002905号,A007716号,A007717号,A007719号,A020555号,A050535号,A053419号,A076864号,A191970号,A316972型,A316974型.
|
|
|
关键词
|
非n,美好的
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
