|
|
A371346
|
|
a(n) is the largest prime < prime(n)^prime(n).
|
|
2
|
|
|
3, 23, 3121, 823541, 285311670569, 302875106592241, 827240261886336764159, 1978419655660313589123977, 20880467999847912034355032910447, 2567686153161211134561828214731016126483283, 17069174130723235958610643029059314756044734357, 10555134955777783414078330085995832946127396083370199442469
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
NextPrime[#^#, -1] & [Prime[Range[15]]] (* Paolo Xausa, Mar 27 2024 *)
|
|
PROG
|
(PARI) a371346(n) = precprime(prime(n)^prime(n))
(Python)
from sympy import prevprime, prime
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|