|
|
A209269
|
|
a(1) = 1 and, for n >= 2, a(n) is the least integer such that the numerator of the continued fraction [a(1),a(2),...,a(n)] is a perfect square.
|
|
0
|
|
|
1, 3, 2, 5, 43, 522, 1104509, 60248974744, 2075863890266492169136, 10942918579397694712648387271683911959312808, 30436613005235318097155473477154291219175029919236526500330140104415890363628017565032
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
PROG
|
(PARI) v=[1]; for(k=1, 6, m=1; while(issquare(contfracpnqn(concat(v, [m]))[1, 1])==0, m++); v=concat(v, [m])); a(n)=if(n<2, 1, v[n]);
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|