cp's OEIS Frontend

A354655 Column 2 of triangle A354650: a(n) = A354650(n,2), for n >= 1.

%I A354655 #7 Jun 04 2022 08:01:17
%S A354655 3,27,147,630,2295,7476,22302,62100,163260,409080,983367,2280306,
%T A354655 5122026,11184075,23806575,49521456,100872135,201558231,395675475,
%U A354655 764130780,1453424259,2725614243,5044092372,9219499800,16655554125,29759775435,52623867051
%N A354655 Column 2 of triangle A354650: a(n) = A354650(n,2), for n >= 1.
%H A354655 Paul D. Hanna, <a href="/A354655/b354655.txt">Table of n, a(n) for n = 1..100</a>
%F A354655 a(n) = (-1)^(n+1) * A354649(n,2), for n >= 1.
%F A354655 a(n) = A354650(n,2), for n >= 1.
%o A354655 (PARI) {A354650(n,k) = my(A=[1+y]); for(i=1,n, A = concat(A,0);
%o A354655 A[#A] = polcoeff(y + sum(m=0,sqrtint(2*#A+9), (-1)^m * x^(m*(m-1)/2) * (1 - x^(2*m+1)) * Ser(A)^(m*(m+1)/2) ),#A-1) );
%o A354655 polcoeff(A[n+1],k,y)}
%o A354655 for(n=1,30,print1(A354650(n,2),", "))
%Y A354655 Cf. A354649, A354650, A354656.
%K A354655 nonn
%O A354655 1,1
%A A354655 _Paul D. Hanna_, Jun 02 2022