A171624 Floor(n-th nonprime / n).

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).

Links

Table of n, a(n) for n=1..86.

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

Adjacent sequences: A171621 A171622 A171623 * A171625 A171626 A171627

Keyword

nonn

Author

Jaroslav Krizek, Dec 13 2009

Extensions

More terms from Harvey P. Dale, Oct 28 2015

Status

approved