# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/ Search: id:a079595 Showing 1-1 of 1 %I A079595 #10 Aug 02 2021 18:52:30 %S A079595 31,714169,2516309,4483363,47127727,145996069,583363661,1028282141, %T A079595 1637687383,1984271941,3680735213,4484951059,5187593417,8601029209, %U A079595 19614906869,23431992781,33458412373,40695658637,41234578433 %N A079595 Primes of the form floor(x^Pi) where x is prime. %e A079595 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. %t A079595 For[i = 1, i < 10000, If[PrimeQ[IntegerPart[Prime[i]^Pi]] == True, Print[IntegerPart[Prime[i]^Pi]]]; i++ ] %t A079595 Select[Floor[Prime[Range[500]]^Pi],PrimeQ] (* _Harvey P. Dale_, Aug 02 2021 *) %Y A079595 Cf. A074218. %K A079595 nonn %O A079595 1,1 %A A079595 _Neil Fernandez_, Jan 27 2003 # Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE