login
A036878
a(n) = p^(p-1) where p = prime(n).
13
2, 9, 625, 117649, 25937424601, 23298085122481, 48661191875666868481, 104127350297911241532841, 907846434775996175406740561329, 88540901833145211536614766025207452637361, 550618520345910837374536871905139185678862401
OFFSET
1,1
COMMENTS
Also the least refactorable number (A033950) that has the n-th prime as its least prime factor. - Robert G. Wilson v, Jun 28 2006
LINKS
S. Colton, Refactorable Numbers - A Machine Invention, J. Integer Sequences, Vol. 2, 1999, #2.
EXAMPLE
5^(5-1) = 5^4 = 625.
MATHEMATICA
Table[Prime@n^(Prime@n - 1), {n, 10}] (* Robert G. Wilson v, Jun 28 2006 *)
#^(#-1)&/@Prime[Range[10]] (* Harvey P. Dale, Oct 23 2015 *)
PROG
(Magma) [p^(p-1): p in PrimesUpTo(50)]; // Vincenzo Librandi, Mar 27 2014
(PARI) a(n) = my(p=prime(n)); p^(p-1); \\ Michel Marcus, Jan 24 2019
CROSSREFS
These integers are refactorable -- i.e., the number of divisors divides the number itself, cf. A033950.
Subset of A062981. Subsequence of A000169.
Subsequence of A111134 and A246655.
Sequence in context: A085605 A336247 A180936 * A162710 A249903 A008322
KEYWORD
nonn,easy
AUTHOR
Simon Colton (simonco(AT)cs.york.ac.uk)
STATUS
approved