login
Primes in A031344.
0

%I #7 Mar 30 2012 17:26:37

%S 2,3,5,7,13,19,37,43,73,79,151,181,211,223,241,337,349,373,379,439,

%T 487,547,577,601,613,643,769,787,811,823,883,919,937,1009,1039,1069,

%U 1123,1249,1303,1381,1753,1789,1801,1831,1933,2017,2053,2131,2161,2239,2389,2593,2617,2659,2671,2707,2791,2917,2953

%N Primes in A031344.

%C Primes that appear to remain prime if transliterated to base 12.

%e 13 is here because 13 (base 10) = 11 (base 12) and 11 is prime in base 10.

%t Select[Table[FromDigits[IntegerDigits[Prime[n]],12],{n,1000}],PrimeQ]

%Y Cf. A031344.

%K nonn,base

%O 1,1

%A _Zak Seidov_, Apr 09 2011