OFFSET
0,3
LINKS
MATHEMATICA
With[{c = Sqrt[7] - Sqrt[2]}, Floor[c Range[0, 80]]] (* Vincenzo Librandi, Aug 01 2013 *)
PROG
(Magma) [Floor(n*(Sqrt(7)-Sqrt(2))): n in [0..80]]; // Vincenzo Librandi, Aug 01 2013
(PARI) vector(100, n, n--; floor(n*(sqrt(7)-sqrt(2)))) \\ G. C. Greubel, Aug 17 2018
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vincenzo Librandi, Jan 30 2010
STATUS
approved