OFFSET
1,1
COMMENTS
27=3^3, 1331=11^3, 2187=3^7, 250047=63^3, 759375=15^5 and 2460375=135^3.
LINKS
Charlie Neder, Table of n, a(n) for n = 1..496
MATHEMATICA
pp = Join[{1}, Select[ Range[10^7], Apply[GCD, Last[ Transpose[ FactorInteger[ # ]]]] > 1 & ]]; Select[pp, PrimeQ[(# - 13)/2] & ]
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Zak Seidov, Oct 11 2002
EXTENSIONS
Extended by Robert G. Wilson v, Oct 14 2002
a(7)-a(28) from Charlie Neder, Feb 11 2019
STATUS
approved