Search: a074218 -id:a074218
|
|
A079595
|
|
Primes of the form floor(x^Pi) where x is prime.
|
|
+0
0
|
|
|
31, 714169, 2516309, 4483363, 47127727, 145996069, 583363661, 1028282141, 1637687383, 1984271941, 3680735213, 4484951059, 5187593417, 8601029209, 19614906869, 23431992781, 33458412373, 40695658637, 41234578433
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
The smallest prime x for which floor(x^Pi) is prime, is 3, for which floor(3^Pi)=31, which is prime, so a(1)=31. The next smallest is 73, for which floor(73^Pi)=714169, so a(2)=714169.
|
|
MATHEMATICA
|
For[i = 1, i < 10000, If[PrimeQ[IntegerPart[Prime[i]^Pi]] == True, Print[IntegerPart[Prime[i]^Pi]]]; i++ ]
Select[Floor[Prime[Range[500]]^Pi], PrimeQ] (* Harvey P. Dale, Aug 02 2021 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
Search completed in 0.004 seconds
|