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.

A144500 Column 4 of array in A144502.

This page as a plain text file.
%I A144500 #12 Oct 08 2023 04:42:31
%S A144500 1,65,946,13219,198773,3289726,60042295,1203809111,26367604594,
%T A144500 627370195033,16127774194871,445733080387750,13185075339881521,
%U A144500 415765494276887249,13925084982848794378,493754789222478044011,18480155500259244528605,728143711886491334229526
%N A144500 Column 4 of array in A144502.
%H A144500 Seiichi Manyama, <a href="/A144500/b144500.txt">Table of n, a(n) for n = 0..401</a>
%F A144500 a(n) = ((24*n^3 + 60*n^2 + 50*n + 5)*a(n-1) + (12*n^2 + 24*n + 1)*a(n-2))/(12*n^2 - 11), with a(0) = 1, a(1) = 65. - _G. C. Greubel_, Oct 08 2023
%t A144500 a[n_]:= a[n]= If[n<2, (65)^n, ((24*n^3+60*n^2+50*n+5)*a[n-1] +(12*n^2 + 24*n+1)*a[n-2])/(12*n^2-11)];
%t A144500 Table[a[n], {n,0,40}] (* _G. C. Greubel_, Oct 08 2023 *)
%o A144500 (Magma) [n le 2 select (65)^(n-1) else ((24*n^3-12*n^2+2*n-9)*Self(n-1) + (12*n^2-11)*Self(n-2))/(12*(n-1)^2 -11): n in [1..40]]; // _G. C. Greubel_, Oct 08 2023
%o A144500 (SageMath)
%o A144500 @CachedFunction
%o A144500 def a(n): # a = A144500
%o A144500     if (n<2): return (65)^n
%o A144500     else: return ((24*n^3 + 60*n^2 + 50*n + 5)*a(n-1) + (12*n^2 + 24*n + 1)*a(n-2))/(12*n^2 - 11)
%o A144500 [a(n) for n in range(41)] # _G. C. Greubel_, Oct 08 2023
%Y A144500 Cf. A144495, A144496, A144497, A144498, A144499, A144501, A144502, A144503.
%K A144500 nonn
%O A144500 0,2
%A A144500 _David Applegate_ and _N. J. A. Sloane_, Dec 13 2008