login
Numbers k such that floor(log(Pi)^k) is prime.
0

%I #11 Jun 06 2023 12:57:06

%S 6,7,8,9,10,12,13,15,18,19,21,22,25,35,53,55,58,73,95,120,125,150,151,

%T 192,347,402,418,490,516,608,635,648,703,764,1007,1042,1125,1159,1326,

%U 1429,1519,1682,1817,1991,2161,2295

%N Numbers k such that floor(log(Pi)^k) is prime.

%t Position[Floor[Log[Pi]^Range[2500]],_?PrimeQ]//Flatten (* _Harvey P. Dale_, Jun 06 2023 *)

%K easy,nonn

%O 1,1

%A _Benoit Cloitre_, Mar 03 2002