cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A354656 Column 3 of triangle A354650: a(n) = A354650(n,3), for n >= 1.

This page as a plain text file.
%I A354656 #10 Sep 30 2023 18:02:34
%S A354656 1,30,340,2530,14595,70737,301070,1157820,4100785,13563010,42321840,
%T A354656 125586440,356621070,973989030,2569116330,6567458520,16317741975,
%U A354656 39504992395,93390535840,215983566780,489454806785,1088433416785,2378160809610,5111208572940,10816601842950
%N A354656 Column 3 of triangle A354650: a(n) = A354650(n,3), for n >= 1.
%H A354656 Paul D. Hanna, <a href="/A354656/b354656.txt">Table of n, a(n) for n = 1..100</a>
%F A354656 a(n) = (-1)^n * A354649(n,3), for n >= 1.
%F A354656 a(n) = A354650(n,3), for n >= 1.
%o A354656 (PARI) {A354650(n,k) = my(A=[1+y]); for(i=1,n, A = concat(A,0);
%o A354656 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 A354656 polcoeff(A[n+1],k,y)}
%o A354656 for(n=1,30,print1(A354650(n,3),", "))
%Y A354656 Cf. A354649, A354650, A354655, A354657.
%K A354656 nonn
%O A354656 1,2
%A A354656 _Paul D. Hanna_, Jun 02 2022