|
|
A358899
|
|
Numbers k such that p(k)^p(k) > p(k-1)^p(k+1), where p(k) = prime(k).
|
|
1
|
|
|
3, 5, 10, 35, 190, 206, 294, 296, 320, 332, 336, 430, 458, 463, 530, 558, 608, 616, 636, 726, 805, 837, 870, 891, 1117, 1171, 1198, 1230, 1232, 1275, 1328, 1371, 1391, 1410, 1445, 1571, 1634, 1651, 1709, 1832, 1880, 1987, 2028, 2066, 2075, 2244, 2249, 2311
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
For k = 3, we have p(2) = 2, p(3) = 5, p(4) = 7, and 3125 = 5^5 > 3^7 = 2187.
|
|
MATHEMATICA
|
p[n_] := Prime[n];
u = Select[1 + Range[3000], p[#]^p[#] > p[# - 1]^p[# + 1] &] (* A385899 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|