OFFSET
1,1
COMMENTS
No terms are 0, 2, or 3 mod 7. - Charles R Greathouse IV, Apr 18 2014
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
EXAMPLE
{13,19,139,313,433,571,883,1489,3547,10513,11779}_10 =
{16,25,256,625,1156,1444,2401,4225,13225,42436,46225}_7 =
{4,5,16,25,34,38,49,65,115,206,215}^2_10.
PROG
(PARI) is(n)=issquare(subst(Pol(digits(n, 7)), 'x, 10)) && isprime(n) \\ Charles R Greathouse IV, Apr 18 2014
(PARI) for(n=4, 1e3, if(vecmax(v=digits(n^2))<7 && isprime(p= subst(Pol(v), 'x, 7)), print1(p", "))) \\ Charles R Greathouse IV, Apr 18 2014
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Zak Seidov, Apr 18 2014
STATUS
approved