|
|
A022841
|
|
Beatty sequence for sqrt(7).
|
|
12
|
|
|
2, 5, 7, 10, 13, 15, 18, 21, 23, 26, 29, 31, 34, 37, 39, 42, 44, 47, 50, 52, 55, 58, 60, 63, 66, 68, 71, 74, 76, 79, 82, 84, 87, 89, 92, 95, 97, 100, 103, 105, 108, 111, 113, 116, 119, 121, 124, 126, 129, 132, 134, 137, 140, 142, 145, 148, 150, 153, 156
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
|
|
MAPLE
|
a:=n->floor(n*sqrt(7)): seq(a(n), n=1..70); # Muniru A Asiru, Sep 28 2018
|
|
MATHEMATICA
|
Table[Floor[n*Sqrt[7]], {n, 1, 60}] (* G. C. Greubel, Sep 28 2018 *)
|
|
PROG
|
(PARI) vector(60, n, floor(n*sqrt(7))) \\ G. C. Greubel, Sep 28 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|