|
|
A022848
|
|
Integer nearest nx, where x = sqrt(5).
|
|
3
|
|
|
0, 2, 4, 7, 9, 11, 13, 16, 18, 20, 22, 25, 27, 29, 31, 34, 36, 38, 40, 42, 45, 47, 49, 51, 54, 56, 58, 60, 63, 65, 67, 69, 72, 74, 76, 78, 80, 83, 85, 87, 89, 92, 94, 96, 98, 101, 103, 105, 107, 110, 112, 114, 116, 119, 121, 123, 125, 127, 130, 132, 134, 136
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
Flatten[Nearest[Range[0, 150], #]&/@(Sqrt[5]Range[0, 67])] (* Harvey P. Dale, Feb 18 2011 *)
|
|
PROG
|
(PARI) vector(60, n, n--; round(n*sqrt(5))) \\ G. C. Greubel, Sep 29 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|