OFFSET
0,1
REFERENCES
H. Brocard, Note 2837, L'Intermédiaire des Mathématiciens, 11 (1904), p. 239.
LINKS
S. H. Weintraub, An interesting recursion, Amer. Math. Monthly, 111 (No. 6, 2004), 528-530.
PROG
(PARI) lista(nn) = {print1(n=7, ", "); for (k=2, nn, m = 2*n - sqrtint(n)^2; print1(m, ", "); n = m; ); } \\ Michel Marcus, Oct 24 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Jun 10 2004
STATUS
approved