OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..1000
MAPLE
f:= proc(n) uses NumberTheory;
nops(Term(ContinuedFraction(sqrt(7)*n), periodic)[2])
end proc:
map(f, [$1..100]); # Robert Israel, Apr 14 2026
CROSSREFS
KEYWORD
nonn
AUTHOR
R. K. Guy, Oct 26 2001
STATUS
approved
