登录
a(n)=3^n*Bell(n)。
8

%I#54 2024年6月8日16:44:59

%S 1,318135121512636147987191799927162540162364016848207775,

%电话:120206639790223927820327744074161731151913065539247018,

%电话:198439435470603154511357550422499871070118279346233805226425052977779175791715118823636386191803509889950776032172

%N a(N)=3^N*贝尔(N)。

%H Chai Wah Wu,n的表,n的a(n)=0..200</a>

%F a(n)=3^n*A000110(n)。

%F a(n)=(1/e)*和{k>=0}(3*k)^n/k!。(这是一个Dobinski类型的公式。)

%计算公式:(1/e)*和{k>=0}1/(k!*(1-3*k*z))。

%F例如:exp(exp(3*z)-1)。

%F a(n)是离散正权函数w(x)的第n个矩,该函数由位于x=3*k,k=0,1。。。,定义为w(x)=(1/e)*Sum_{k>=0}Dirac(x-3*k)/k!。

%光纤:1/(1-3x/(1-3x/(1-3+(1-6x/(1-3×/(1-9x/(1-…)…))(连分数)。-_菲利普·德雷厄姆,2014年9月18日

%F a(0)=1;a(n)=和{k=1..n}二项式(n-1,k-1)*3^k*a(n-k).-_伊利亚·古特科夫斯基,2020年1月16日

%t表[3^n BellB[n],{n,0,20}](*文森佐·利班迪,2014年9月19日*)

%o(Python)

%o需要#Python 3.2或更高版本。

%o从itertools导入累加

%o A247452_list,整体叶盘,b,n3=[1,3],[1],1,9

%o表示_在范围(2201)内:

%o blist=列表(累加([b]+blist))

%o b=blist[-1]

%o A247452_list.append(b*n3)

%o n3*=3#_查瓦乌,2014年9月19日

%o(岩浆)[3^n*Bell(n):n英寸[0..20]];//_文森佐·利班迪(Vincenzo Librandi),2014年9月19日

%Y参考A000110、A055882。

%K nonn公司

%0、2

%A _Karol A.Penson,2014年9月17日