|
|
A135455
|
|
Numbers n such that n*phi is within 0.1 of an integer, where phi is the golden ratio.
|
|
1
|
|
|
5, 8, 13, 21, 26, 29, 34, 42, 47, 50, 55, 60, 63, 68, 76, 81, 84, 89, 94, 97, 102, 110, 115, 118, 123, 131, 136, 139, 144, 149, 152, 157, 165, 170, 173, 178, 186, 191, 199, 204, 207, 212, 220, 225, 228, 233, 238, 241, 246, 254, 259, 262, 267, 275, 280, 283, 288
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
By using the formula of Binet one can easily show that all Fibonacci numbers greater than 3 are in the sequence. Furthermore the sequence a(n)/n converges to 1/5.
|
|
LINKS
|
|
|
FORMULA
|
|
|
EXAMPLE
|
47 is in the sequence because 1.6180339887*47 = 76.047 which is within .1 of an integer.
|
|
MATHEMATICA
|
Select[Range[300], Abs[ #*(1 + Sqrt[5])/2 - Round[ #*(1 + Sqrt[5])/2]] < 0.1 &] (* or *) grw1Q[n_]:=Module[{c=n*GoldenRatio}, Abs[c-Round[c]]<=.1]; Select[Range[ 300], grw1Q] (* Harvey P. Dale, Mar 20 2015 *)
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|