1,1
Select[ Range[ 25000], Length[ Last[ ContinuedFraction[ Sqrt[5] *# ]]] == 2 & ]
Cf. A064933.
Sequence in context: A034685 A046683 A065055 this_sequence A103321 A138196 A101351
Adjacent sequences: A065027 A065028 A065029 this_sequence A065031 A065032 A065033
nonn
Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 02 2001
Search completed in 0.002 seconds