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.

A279627 Engel expansion of the Glaisher-Kinkelin constant A074962.

This page as a plain text file.
%I A279627 #6 Dec 16 2016 14:03:38
%S A279627 1,4,8,27,59,188,384,427,2525,71429,80727,357492,13200877,65161876,
%T A279627 7439912342,15555881542,71559279848,116275866868,345574982189,
%U A279627 737460049244,9183275685671,12641946167319,126181443702371
%N A279627 Engel expansion of the Glaisher-Kinkelin constant A074962.
%C A279627 See A006784 for more details on the Engel expansion.
%e A279627 1.2824271291006... = 1/1 + 1/(1*4) + 1/(1*4*8) + 1/(1*4*8*27) + ...
%t A279627 EngelExp[A_, n_] := Join[Array[1 &, Floor[A]], First@Transpose@NestList[{Ceiling[1/Expand[#[[1]] #[[2]] - 1]], Expand[#[[1]] #[[2]] - 1]} &, {Ceiling[1/(A - Floor[A])], A - Floor[A]}, n - 1]];
%t A279627 EngelExp[Glaisher, 22]
%Y A279627 Cf. A074962.
%K A279627 nonn
%O A279627 1,2
%A A279627 _Benedict W. J. Irwin_, Dec 16 2016