login
A068902
Least multiple of n not less than the n-th prime.
4
2, 4, 6, 8, 15, 18, 21, 24, 27, 30, 33, 48, 52, 56, 60, 64, 68, 72, 76, 80, 84, 88, 92, 96, 100, 104, 108, 112, 116, 120, 155, 160, 165, 170, 175, 180, 185, 190, 195, 200, 205, 210, 215, 220, 225, 230, 235, 240, 245, 250, 255, 260
OFFSET
1,1
LINKS
FORMULA
a(n) = A000040(n) + A068901(n).
a(n) = n*ceiling(prime(n)/n). - Vladeta Jovovic, Apr 06 2003
MAPLE
seq(n*ceil(ithprime(n)/n), n=1..60); # Robert Israel, Feb 27 2017
MATHEMATICA
Table[n Ceiling[Prime@ n/n], {n, 60}] (* Michael De Vlieger, Feb 27 2017 *)
PROG
(PARI) vector(60, n, n*ceil(prime(n)/n) ) \\ G. C. Greubel, Jun 09 2019
(Magma) [n*Ceiling(NthPrime(n)/n): n in [1..60]]; // G. C. Greubel, Jun 09 2019
(Sage) [n*ceil(nth_prime(n)/n) for n in (1..60)] # G. C. Greubel, Jun 09 2019
CROSSREFS
Sequence in context: A359090 A167229 A192333 * A269332 A077569 A270140
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Mar 05 2002
STATUS
approved