OFFSET
1,8
LINKS
Andrew Howroyd, Table of n, a(n) for n = 1..10000
FORMULA
a(n) = floor(A008578(n)/n).
MATHEMATICA
nn=100; With[{ncs=Join[{1}, Prime[Range[nn]]]}, Floor[#[[1]]/#[[2]]]&/@ Thread[ {ncs, Range[nn+1]}]] (* Harvey P. Dale, Feb 19 2013 *)
PROG
(PARI) a(n) = if(n==1, 1, prime(n-1)\n); \\ Andrew Howroyd, Oct 29 2025
CROSSREFS
KEYWORD
nonn
AUTHOR
Jaroslav Krizek, Dec 13 2009
EXTENSIONS
a(51) onward from Andrew Howroyd, Oct 29 2025
STATUS
approved
