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.

A356608 a(n) = n! * Sum_{k=0..floor(n/4)} (n - 4*k)^k/(24^k * (n - 4*k)!).

This page as a plain text file.
%I A356608 #26 Sep 14 2022 09:34:30
%S A356608 1,1,1,1,1,6,31,106,281,1261,13861,106261,558361,2709136,32802771,
%T A356608 447762316,4093711441,28011714641,293624974441,5549250905281,
%U A356608 80454378591121,815886496908946,8379058314620071,168672787637953446,3514729162490432041,51656083670790267901
%N A356608 a(n) = n! * Sum_{k=0..floor(n/4)} (n - 4*k)^k/(24^k * (n - 4*k)!).
%H A356608 Vaclav Kotesovec, <a href="/A356608/b356608.txt">Table of n, a(n) for n = 0..455</a>
%F A356608 E.g.f.: Sum_{k>=0} x^k / (k! * (1 - k*x^4/24)).
%t A356608 a[n_] := n! * Sum[(n - 4*k)^k/(24^k*(n - 4*k)!), {k, 0, Floor[n/4]}]; a[0] = 1; Array[a, 26, 0] (* _Amiram Eldar_, Aug 19 2022 *)
%o A356608 (PARI) a(n) = n!*sum(k=0, n\4, (n-4*k)^k/(24^k*(n-4*k)!));
%o A356608 (PARI) my(N=30, x='x+O('x^N)); Vec(serlaplace(sum(k=0, N, x^k/(k!*(1-k*x^4/24)))))
%Y A356608 Cf. A354436, A356029, A356328.
%Y A356608 Cf. A354552, A356630, A356634.
%K A356608 nonn
%O A356608 0,6
%A A356608 _Seiichi Manyama_, Aug 18 2022