|
| |
|
|
A140979
|
|
Floor(2*phi*floor(n*phi)) where phi = A001622.
|
|
1
| |
|
|
3, 9, 12, 19, 25, 29, 35, 38, 45, 51, 55, 61, 67, 71, 77, 80, 87, 93, 97, 103, 106, 113, 119, 122, 129, 135, 139, 145, 148, 155, 161, 165, 171, 177, 181, 187, 190, 197, 203, 207, 213, 216, 223, 229, 232, 239, 245, 249, 255, 258, 265, 271, 275, 281, 284, 291, 297, 300, 307, 313, 317, 323, 326, 333, 339, 343, 349, 355
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
REFERENCES
| Shiri Artstein-avidan, Aviezri S. Fraenkel and Vera T. Sos, A two-parameter family of an extension of Beatty sequences, http://www.wisdom.weizmann.ac.il/~fraenkel/Papers/coatp8.pdf, Discrete Math., 308 (2008), 4578-4588.
|
|
|
LINKS
| Shiri Artstein-Avidan, Aviezri S. Fraenkel and Vera T. Sos, A two-parameter family of an extension of Beatty, Discr. Math. 308 (2008) 4578-4588.
|
|
|
MAPLE
| Digits := 200: a001622:= (1+sqrt(5))/2 : A140979 := proc(n) global a001622 ; floor(2*a001622*floor(n*a001622)) ; end: for n from 1 to 100 do printf("%d, ", A140979(n)); end:
|
|
|
CROSSREFS
| Cf. A000201.
Sequence in context: A103531 A108860 A006499 * A096726 A155504 A022379
Adjacent sequences: A140976 A140977 A140978 * A140980 A140981 A140982
|
|
|
KEYWORD
| nonn,easy
|
|
|
AUTHOR
| N. J. A. Sloane (njas(AT)research.att.com), Sep 04 2008
|
|
|
EXTENSIONS
| Corrected definition, extended, added Maple program. - R. J. Mathar, Sep 05 208
|
| |
|
|
