Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #16 Jun 29 2019 01:41:54
%S 17,89,409,449,577,953,7649,12401,14593,23689,28393,29033,30689,36809,
%T 40153,46457,47969,54577,56393,59273,65033,72649,78713,92033,98953,
%U 106033,141353,146249,150209,169657,176489,199889,205433,221849,235273,238481,245033,258569,381841,394633,441193,529273
%N Primes whose base-6 representation is a square when read in base 10.
%C Primes in the sequence A267766.
%H Chai Wah Wu, <a href="/A267820/b267820.txt">Table of n, a(n) for n = 1..10000</a>
%e 17 in base 6 is 25, and 25 = 5^2 in base 10.
%t Select[Prime@ Range@ 45000, IntegerQ@ Sqrt@ FromDigits@ IntegerDigits[#, 6] &] (* _Michael De Vlieger_, Jan 24 2016 *)
%o (Python)
%o from sympy import isprime
%o A267820_list = [int(d,6) for d in (str(i**2) for i in range(1,10**6)) if max(d) < '6' and isprime(int(d,6))] # _Chai Wah Wu_, Feb 22 2016
%Y In other bases: A267817 - A267821, A241246, A267490.
%K nonn,base
%O 1,1
%A _Christopher Cormier_, Jan 20 2016