OFFSET
1,2
COMMENTS
EXAMPLE
MATHEMATICA
Select[Range@49, PrimeQ[PrimePi[3^#]]&]
CROSSREFS
KEYWORD
nonn,more
AUTHOR
David Baugh, Mar 21 2015
STATUS
approved