A013636 a(n) = n*nextprime(n).
0, 2, 6, 15, 20, 35, 42, 77, 88, 99, 110, 143, 156, 221, 238, 255, 272, 323, 342, 437, 460, 483, 506, 667, 696, 725, 754, 783, 812, 899, 930, 1147, 1184, 1221, 1258, 1295, 1332, 1517, 1558, 1599, 1640, 1763
Offset: 0
Links
- Harvey P. Dale, Table of n, a(n) for n = 0..1000
Crossrefs
Cf. A151800.
Programs
-
Maple
[ seq(nextprime(i)*i,i=0..100) ];
-
Mathematica
Table[n NextPrime[n],{n,0,50}] (* Harvey P. Dale, Jan 08 2025 *)
-
PARI
a(n) = n*nextprime(n+1); \\ Michel Marcus, Dec 05 2024
Formula
a(n) = n^2 + O(n^1.525). - Charles R Greathouse IV, Dec 05 2024
Extensions
Comment removed by Charles R Greathouse IV, Mar 19 2010