A171622 Floor(n-th noncomposite / n).

1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 4, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4

Offset

1,8

Comments

a(n)= floor(A008578(n)/A000027(n)) = floor(A008578(n)/n). Numerators of (A008578(n)/A000027(n)) in A171525(n), denominators of (A008578(n)/A000027(n)) in A171526(n).

Links

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

Mathematica

nn=100; With[{ncs=Join[{1}, Prime[Range[nn]]]}, Floor[#[[1]]/#[[2]]]&/@ Thread[ {ncs, Range[nn+1]}]] (* Harvey P. Dale, Feb 19 2013 *)

Crossrefs

Sequence in context: A230261 A242306 A245636 * A351846 A111858 A111856

Adjacent sequences: A171619 A171620 A171621 * A171623 A171624 A171625

Keyword

nonn

Author

Jaroslav Krizek, Dec 13 2009

Status

approved