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.

A131972 Sum of all n-digit Apery numbers.

This page as a plain text file.
%I A131972 #11 Nov 30 2019 09:12:40
%S A131972 2,24,180,7420,33264,991848,3938220,103832872,389398464,9620555000,
%T A131972 34901442000,828288777420,2940343837200,67898251759800,
%U A131972 237371722628040,5373868753340880,97581248745060600,335240928272918304,7415892272293658608,25286571126114014640,553714770886681187168
%N A131972 Sum of all n-digit Apery numbers.
%e A131972 Sum of all 1-digit Apery numbers is 0 + 2 = 2.
%e A131972 Sum of all 2-digit Apery numbers is 24
%e A131972 Sum of all 3-digit Apery numbers is 180.
%t A131972 digNum[n_] := Length @ IntegerDigits[n]; apery[n_] := n^2 * Binomial[2n, n]; digCount = 0; sum = 0; cumsum = {}; Do[a = apery[n]; If[digNum[a] > digCount, digCount++; AppendTo[cumsum, sum]]; sum += a, {n, 0, 35}]; Differences[cumsum] (* _Amiram Eldar_, Nov 30 2019 *)
%Y A131972 Cf. A002736.
%K A131972 nonn,base,less
%O A131972 1,1
%A A131972 _Parthasarathy Nambi_, Oct 06 2007
%E A131972 More terms from _Amiram Eldar_, Nov 30 2019