A052027 Primes in base 10 that remain primes in seven bases b, 2<=b<=10, expansions interpreted as decimal numbers.

5, 9241, 17791, 330289, 391231, 1005481, 1210483, 2378143, 2469241, 2779939, 2840041, 6817501, 8320831, 9865711, 10871407, 11087191, 12259603, 13645393, 15665833, 16707883, 17694463, 25751863, 27794287, 31488481

Offset: 1

Author

Patrick De Geest, Dec 15 1999

Keywords

• nonn
• base

Links

• Sebastian Petzelberger, Table of n, a(n) for n = 1..1000
• Carlos Rivera, PP&P Puzzle 24: Primes in several bases

Crossrefs

Cf. A052026, A038537, A052027-A052033, A084482, A236356.

Programs

Mathematica

Select[Prime[Range@ 100000], Count[PrimeQ /@ Table[FromDigits[IntegerDigits[#, i]], {i, 2, 10}], True] == 7 &] (* Michael De Vlieger, Mar 21 2015, after Harvey P. Dale at A052032 *)

Extensions

Missing terms 2378143 and 2469241 added by Sebastian Petzelberger, Mar 21 2015