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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A293734型 四元字母表上的多组非空单词,总共有n个字母,因此在单词的每个前缀中,字母表中的每个字母至少与后面的字母一样频繁。 4
1, 1, 3, 7, 20, 53, 157, 455, 1393, 4270, 13495, 42907, 139323, 455182, 1510831, 5042858, 17044789, 57891598, 198665585, 684615958, 2379765470, 8302157207, 29177909254, 102867895209, 364981305292, 1298526198294, 4645569147108, 16659856695779, 60036951331540 (列表图表参考历史文本内部格式)
抵消
0,3
链接
阿洛伊斯·海因茨,n=0..1000时的n,a(n)表
配方奶粉
G.f.:产品{j>=1}1/(1-x^j)^A005817号(j) ●●●●。
a(n)~c*4^n/n^3,其中c=19.002514794-瓦茨拉夫·科特索维奇2019年5月30日
MAPLE公司
g: =proc(n)选项记住`如果`(n<2,1,(4*(2*n+3)*
g(n-1)+16*(n-1,*n*g(n-2))/((n+3)*(n+4)))
结束时间:
a: =proc(n)选项记忆`如果`(n=0,1,加(加(g(d)
*d、 d=数值[除数](j))*a(n-j),j=1..n)/n)
结束时间:
seq(a(n),n=0..35);
数学
g[n]:=g[n]=如果[n<2,1,(4*(2*n+3)*g[n-1]+16*(n-1)*n*g[n-2])/((n+3,*(n+4))];
a[n_]:=a[n]=如果[n==0,1,Sum[Sum[g[d]*d,{d,Divisors[j]}]*a[n-j],{j,1,n}]/n];
表[a[n],{n,0,35}](*Jean-François Alcover公司2019年5月30日之后阿洛伊斯·海因茨*)
黄体脂酮素
(Python)
从sympy.core.cache导入缓存
从sympy导入除数
@缓存
def g(n):如果n<2,则返回1(4*(2*n+3)*g(n-1)+16*(n-1)*n*g(n-2))//((n+3)*(n+4))
@缓存
定义a(n):如果n==0,则返回1,否则求和(除数(j)中d的和(g(d)*d)*a(n-j),范围(1,n+1)中j的)//n
打印([a(n)代表范围(36)中的n])#因德拉尼尔·戈什2017年10月15日
交叉参考
第k列=第4列,共列A293108型.
囊性纤维变性。A005817号.
关键词
非n
作者
阿洛伊斯·海因茨2017年10月15日
状态
经核准的

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

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

上次修改时间:2024年4月19日11:14 EDT。包含371791个序列。(在oeis4上运行。)