OFFSET
0,7
COMMENTS
The constant K(3)=1.62227050288476731595695... is related to the Josephus problem with q=3 and the computation of A054995.
LINKS
A. M. Odlyzko and H. S. Wilf, Functional iteration and the Josephus problem, Glasgow Math. J. 33, 235-240, 1991.
MATHEMATICA
For[p = 1; nn = 10^4; n = 1, n <= nn, n++, p = Ceiling[3/2*p]]; p/(3/2)^nn // ContinuedFraction[#, 93] & (* Jean-François Alcover, Jul 11 2013, after Pari *)
PROG
(PARI) p=1; N=10^4; for(n=1, N, p=ceil(3/2*p)); c=(p/(3/2)^N)+0. \\ This gives K(3) not the sequence!
CROSSREFS
KEYWORD
nonn,cofr
AUTHOR
Ralf Stephan, Apr 23 2003
EXTENSIONS
Offset changed by Andrew Howroyd, Aug 07 2024
STATUS
approved