A271511 a(n) = (p+1)*(p+2)/2 where p is the n-th prime.
6, 10, 21, 36, 78, 105, 171, 210, 300, 465, 528, 741, 903, 990, 1176, 1485, 1830, 1953, 2346, 2628, 2775, 3240, 3570, 4095, 4851, 5253, 5460, 5886, 6105, 6555, 8256, 8778, 9591, 9870, 11325, 11628, 12561, 13530, 14196, 15225, 16290, 16653, 18528, 18915, 19701
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A253145.
Programs
-
Magma
[(p+1)*(p+2) / 2: p in PrimesUpTo(200)];
-
Mathematica
Table[(Prime[n]^2 + 3 Prime[n] + 2) / 2, {n, 50}]
-
PARI
lista(nn) = forprime(p=2, nn, print1((p+1)*(p+2)/2, ", ")); \\ Altug Alkan, Apr 09 2016
Comments