OFFSET
1,4
FORMULA
a(n) = floor(A000040(n)/3). - R. J. Mathar, Sep 21 2008
MAPLE
A144769 := proc(n) floor(ithprime(n)/3); end; # R. J. Mathar, Sep 21 2008
MATHEMATICA
Quotient[Prime[Range[5! ]], 3]
PROG
(PARI) a(n)=prime(n)\3 \\ Charles R Greathouse IV, Oct 05 2011
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Vladimir Joseph Stephan Orlovsky, Sep 20 2008
EXTENSIONS
Edited by R. J. Mathar, Sep 21 2008
STATUS
approved