OFFSET
1,1
COMMENTS
Primes in the sequence A267765.
LINKS
Chai Wah Wu, Table of n, a(n) for n = 1..10000
EXAMPLE
89 in base 5 is 324, and 324 = 18^2 in base 10.
MATHEMATICA
Select[Prime@ Range[10^6], IntegerQ@ Sqrt@ FromDigits@ IntegerDigits[#, 5] &] (* Michael De Vlieger, Jan 24 2016 *)
PROG
(Python)
from sympy import isprime
A267819_list = [int(d, 5) for d in (str(i**2) for i in range(1, 10**6)) if max(d) < '5' and isprime(int(d, 5))] # Chai Wah Wu, Feb 22 2016
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Christopher Cormier, Jan 20 2016
STATUS
approved