login
A067901
Numbers k such that floor(log(Pi)^k) is prime.
0
6, 7, 8, 9, 10, 12, 13, 15, 18, 19, 21, 22, 25, 35, 53, 55, 58, 73, 95, 120, 125, 150, 151, 192, 347, 402, 418, 490, 516, 608, 635, 648, 703, 764, 1007, 1042, 1125, 1159, 1326, 1429, 1519, 1682, 1817, 1991, 2161, 2295
OFFSET
1,1
MATHEMATICA
Position[Floor[Log[Pi]^Range[2500]], _?PrimeQ]//Flatten (* Harvey P. Dale, Jun 06 2023 *)
CROSSREFS
Sequence in context: A051053 A178868 A069838 * A115840 A371565 A353437
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, Mar 03 2002
STATUS
approved