Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A052027
Primes in base 10 that remain primes in seven bases b, 2<=b<=10, expansions interpreted as decimal numbers.
11
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,1
LINKS
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 *)
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Dec 15 1999
EXTENSIONS
Missing terms 2378143 and 2469241 added by Sebastian Petzelberger, Mar 21 2015
STATUS
approved