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.

A005348 Number of ways to add n ordinals.

This page as a plain text file.
%I A005348 M1435 #51 Mar 23 2025 23:27:40
%S A005348 1,2,5,13,33,81,193,449,1089,2673,6561,15633,37249,88209,216513,
%T A005348 531441,1266273,3017169,7189057,17537553,43046721,102568113,244390689,
%U A005348 582313617,1420541793,3486784401,8308017153,19795645809,47167402977,115063885233,282429536481
%N A005348 Number of ways to add n ordinals.
%D A005348 John H. Conway and Richard K. Guy, The Book of Numbers, New York: Springer-Verlag, 1996. See pp. 270-271.
%D A005348 W. Sierpiński, Cardinal and Ordinal Numbers, 2nd ed. p 275.
%D A005348 N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
%H A005348 P. Erdős, <a href="http://dx.doi.org/10.1090/S0002-9939-1950-0035809-8">Some remarks on set theory</a>, Proc. Am. Math. Soc. 1 (1950) 127-141.
%H A005348 R. K. Guy, <a href="http://www.jstor.org/stable/2691503">The Second Strong Law of Small Numbers</a>, Math. Mag, 63 (1990), no. 1, 3-20.
%H A005348 R. K. Guy, <a href="/A005347/a005347.pdf">The Second Strong Law of Small Numbers</a>, Math. Mag, 63 (1990), no. 1, 3-20. [Annotated scanned copy]
%H A005348 R. K. Guy and N. J. A. Sloane, <a href="/A005180/a005180.pdf">Correspondence</a>, 1988.
%H A005348 Bill Sands and Tommy Kucera, <a href="/A005348/a005348.pdf">Letter to N. J. A. Sloane</a>, Jun 10 1975.
%H A005348 A. Wakulicz, <a href="http://matwbn.icm.edu.pl/ksiazki/fm/fm36/fm36126.pdf">Sur la somme d'un nombre fini de nombres ordinaux</a>, Fund. Math. 36 (1949), 254-266.
%H A005348 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/OrdinalNumber.html">Ordinal Number</a>
%H A005348 <a href="/index/Rec#order_05">Index entries for linear recurrences with constant coefficients</a>, signature (0,0,0,0,81).
%F A005348 a(n) = 81*a(n-5) for n >= 21.
%t A005348 Join[{1, 2, 5, 13, 33, 81, 193, 449, 1089, 2673, 6561, 15633, 37249, 88209}, LinearRecurrence[ {0, 0, 0, 0, 81}, {216513, 531441, 1266273, 3017169, 7189057}, 20]] (* _Harvey P. Dale_, Dec 15 2014 *)
%o A005348 (Magma) I:=[1,2,5,13,33,81,193,449,1089,2673,6561,15633,37249, 88209,216513,531441,1266273,3017169,7189057,17537553, 43046721]; [n le 21 select I[n] else 81*Self(n-5): n in [1..50]]; // _Vincenzo Librandi_, Dec 17 2015
%K A005348 nonn,easy
%O A005348 1,2
%A A005348 _N. J. A. Sloane_, _R. K. Guy_, Bill Sands and Tommy Kucera