A166127 Minimum value of j such that floor(j^2 / prime(n)) > 0.
0, 2, 3, 3, 4, 4, 5, 5, 5, 6, 6, 7, 7, 7, 7, 8, 8, 8, 9, 9, 9, 9, 10, 10, 10, 11, 11, 11, 11, 11, 12, 12, 12, 12, 13, 13, 13, 13, 13, 14, 14, 14, 14, 14, 15, 15, 15, 15, 16, 16, 16, 16, 16, 16, 17, 17, 17, 17, 17, 17, 17, 18, 18, 18, 18, 18, 19, 19, 19, 19, 19, 19, 20, 20, 20, 20, 20
Offset: 1
Keywords
Links
- C. H. Gribble, Table of n, a(n) for n=1,..., 78498 (i.e. for primes < 10^6).
Crossrefs
Cf. A165974
Programs
-
Mathematica
Join[{0},Table[Ceiling[Sqrt[p]],{p,Prime[Range[2,80]]}]] (* Harvey P. Dale, Oct 10 2020 *)
Comments