A101340 a(n) = p^p + p, with p = prime(n).
6, 30, 3130, 823550, 285311670622, 302875106592266, 827240261886336764194, 1978419655660313589123998, 20880467999847912034355032910590, 2567686153161211134561828214731016126483498
Offset: 1
Keywords
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..77
Programs
-
Magma
[p^p+p: p in PrimesUpTo(40)]; // Vincenzo Librandi, Mar 27 2014
-
Mathematica
Table[Prime[n]^Prime[n] + Prime[n], {n, 20}] (* Vincenzo Librandi, Mar 27 2014 *)
-
PARI
for(x=1,16,print( prime(x)^prime(x)+prime(x)))
-
PARI
a(n,p=prime(n))=p^p+p \\ Charles R Greathouse IV, Dec 12 2022