|
|
A069459
|
|
a(n) = prime(n)^n - 1.
|
|
5
|
|
|
1, 8, 124, 2400, 161050, 4826808, 410338672, 16983563040, 1801152661462, 420707233300200, 25408476896404830, 6582952005840035280, 925103102315013629320, 73885357344138503765448, 12063348350820368238715342, 3876269050118516845397872320, 1271991467017507741703714391418
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
= 3876269050118516845397872320 =
= 2^6*3^3*5*13*17*281*232073*31129845205681.
|
|
MATHEMATICA
|
Table[Prime[n]^n - 1, {n, 1, 25}] (* G. C. Greubel, Apr 22 2018 *)
|
|
PROG
|
(PARI) for(n=1, 25, print1(prime(n)^n - 1, ", ")) \\ G. C. Greubel, Apr 22 2018
(Magma) [NthPrime(n)^n - 1: n in [1..25]]; // G. C. Greubel, Apr 22 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|