1,1

a(n)>n iff n is in A055114. Note that there are very few composites in A055114 : 529,851...are the first.

Table of n, a(n) for n=1..76.

(PARI) a(n)=if(n<0, 0, s=1; while(abs(vecmax(contfrac(n/s))-2)>0, s++); s)

Cf. A055114.

Sequence in context: A333462 A133850 A160902 * A270566 A182534 A165918

Adjacent sequences: A082405 A082406 A082407 * A082409 A082410 A082411

nonn

Benoit Cloitre, Apr 23 2003

approved