OFFSET
1,3
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..10000
MATHEMATICA
p[n_]:=1+Floor[n/Sqrt[6]]
Table[p[n], {n, 1, 90}] (* A194986 *)
PROG
(Magma) [1+Floor(n/Sqrt(6)): n in [1..80] ]; // Vincenzo Librandi, Sep 10 2011
(PARI) a(n)=1+sqrtint(n^2\6) \\ Charles R Greathouse IV, Sep 02 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Sep 07 2011
STATUS
approved