login
A171624
Floor(n-th nonprime / n).
1
1, 2, 2, 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1
OFFSET
1,2
COMMENTS
a(n)= floor(A018252(n)/A000027(n)) = floor(A018252(n)/n). Numerators of (A018252(n)/A000027(n)) in A171529(n), denominators of (A018252(n)/A000027(n)) in A171530(n).
FORMULA
a(n) = 1 for n >= 5.
MATHEMATICA
Module[{nn=100, np}, np=Complement[Range[nn], Prime[Range[PrimePi[nn]]]]; Floor[np/Range[Length[np]]]] (* Harvey P. Dale, Oct 28 2015 *)
CROSSREFS
Sequence in context: A292560 A086137 A085976 * A032548 A030597 A030599
KEYWORD
nonn
AUTHOR
Jaroslav Krizek, Dec 13 2009
EXTENSIONS
More terms from Harvey P. Dale, Oct 28 2015
STATUS
approved