A113016 Primes that remain primes when their decimal representation is interpreted duodecimally.

2, 3, 5, 7, 11, 17, 31, 37, 61, 67, 107, 131, 157, 167, 181, 241, 251, 271, 277, 307, 347, 397, 401, 421, 431, 457, 541, 557, 577, 587, 617, 647, 661, 701, 727, 751, 797, 881, 907, 971, 1021, 1051, 1061, 1087, 1151, 1201, 1231, 1297, 1301, 1367, 1471, 1601

Offset: 1

Author

Reinhard Zumkeller, Oct 11 2005

Keywords

• nonn
• base

Examples

			A000040(19) = 67 -> 6*12^1 + 7*12^0 = 72 + 7 = 79 = A000040(22).
		

Links

• Robert Price, Table of n, a(n) for n = 1..3642
• Eric Weisstein's World of Mathematics, Duodecimal

Crossrefs

Cf. A113017, A102487, A000040.

Programs

Mathematica

Select[ Prime[ Range[256]], PrimeQ[ FromDigits[ IntegerDigits[ # ], 12]] &] (* Robert G. Wilson v, Oct 12 2005 *)