|
%I #13 Jul 25 2017 02:41:04
%S 1,4,28,208,1540,11440,84976,631360,4690972,34854352,258971536,
%T 1924189120,14296956112,106228114624,789287772352,5864503926016,
%U 43573975930372,323759929988272,2405575577105392,17873718523387456,132803898120114352,986749082625941824
%N Number of palstars of length 2n over an alphabet of size 4.
%H Lars Blomberg, <a href="/A246021/b246021.txt">Table of n, a(n) for n = 0..100</a>
%H L. Bruce Richmond and J. Shallit, <a href="http://www.combinatorics.org/ojs/index.php/eljc/article/view/v21i3p25">Counting the Palstars</a>, Electronic Journal of Combinatorics, 21(3) (2014), #P3.25.
%o (PARI) \\ Richmond and Shallit, Section 2
%o U(k,size)= { local u; u= vector(size,x,0); u[1]=1;
%o for (i = 1,length(u)-1,if(i%2==1, u[i+1]=k*u[i], u[i+1]=k*u[i]-u[i\2+1]));
%o return(u); }
%o u = U(4,101);
%o p = vector(length(u),x,0); p[1]=1;
%o for(n=1,length(u)-1,p[n+1]=sum(i=1,n,u[i+1]*p[n-i+1]));
%o p \\ _Lars Blomberg_, Jul 25 2017
%Y Cf, A246019, A246020.
%K nonn
%O 0,2
%A _N. J. A. Sloane_, Aug 13 2014
%E a(11)-a(21) from _Lars Blomberg_, Jul 25 2017
|
