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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A054745号 在输入置换下没有输出的非同构二进制n状态自动机的数目。 13
1, 1, 7, 74, 1474, 41876, 1540696, 68343112, 3540691525, 209612916303, 13957423192794, 1032436318269648, 83993175608894096, 7453446303042245261, 716451740543945788671, 74159075140708644544128, 8223831291824019614386868, 972718473204236819072891710 (列表图表参考历史文本内部格式)
抵消
0.3
评论
也是无序内函数对的同构类,即从{1,…,n}到自身的函数的无序对{f,g}-克里斯蒂安·鲍尔2003年12月18日
参考文献
F.Harary和E.Palmer,《图形计数》,1973年。
链接
阿洛伊斯·海因茨,n=0..45时的n,a(n)表
哈里森硕士,有限自动机的普查、加拿大。数学杂志。,17,第1期,1965年,第110页。
配方奶粉
a(n)=和{1*s_1+2*s_2+…=n,1*t_1+2*t_2=2}(固定a[s_1,s_2,…;t1,t_2]/(1^s_1*s_1!*2^s_2*s_2!*…*1^t_1*t1!*2 ^t_2*t_2!)其中固定a[…]=prod{i,j>=1}((总和{d|lcm(i,j)}(d*s_d))^(gcd(i,j)*s_i*t_j))-克里斯蒂安·鲍尔2003年12月18日
MAPLE公司
带有(数字理论):
b: =proc(n,i)选项记忆`if`(n=0,{0},`if`(i<1,{},
{seq(映射(p->p+j*x^i,b(n-i*j,i-1))[],j=0..n/i)})
结束时间:
a: =proc(n)选项记忆;加法(add(mul(mul))
*d、 d=除数(ilcm(i,j))^(igcd(i,j)*系数(s,x,i)*
系数(t,x,j),j=1..度(t),i=1..度)
/mul(i^系数(t,x,i)*系数(t,x,i)!,i=1..度(t))
/mul(i^coeff(s,x,i)*系数(s,x,i)!,i=1..度)
,t=b(2$2),s=b(n$2))
结束时间:
seq(a(n),n=0..20)#阿洛伊斯·海因茨2014年8月15日
数学
b[n_,i_]:=b[n,i]=如果[n==0,{0},如果[i<1,{},表[Map[Function[{p},p+j*x^i],b[n-i*j,i-1]],{j,0,n/i}]//Flatten//Union]];
a[n_]:=a[n]=总和[Sum[Product[Product[With[{g=GCD[i,j]*Coefficient[s,x,i]*Coffecient[t,x,j]},If[g==0,1,Sum[Cefficient[s,x,d]*d,{d,Divisors[LCM[i,j]]}]^g]],{j,1,Exponent[t,x]}],{i,1,Indonent[s,x]{]/
乘积[i^系数[t,x,i]系数[t、x、i]!,{i,指数[t,x]}]/
乘积[i^系数[s,x,i]系数[s、x、i]!,{i,指数[s,x]}],{t,b[2,2]}],}s,b[n,n]}];
表[a[n],{n,0,20}](*Jean-François Alcover公司2015年3月16日之后阿洛伊斯·海因茨,于2021年1月1日更新*)
交叉参考
关键词
非n
作者
扩展
更多术语来自阿洛伊斯·海因茨2014年8月15日
状态
经核准的

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

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

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