login
Concatenation of n in base 10 down up to base 2 is prime, all numbers are interpreted as decimals.
4

%I #8 Oct 20 2019 17:26:55

%S 21,117,241,283,389,517,547,627,1219,1223,1247,1285,1287,1323,1467,

%T 1505,1591,1599,1689,1713,1817,1961,2203,2309,2377,2607,2837,2847,

%U 2899,2911,3227,3261,3499,3823,4007,4069,4183,4347,4403,4473,4507,4535,4637

%N Concatenation of n in base 10 down up to base 2 is prime, all numbers are interpreted as decimals.

%H Harvey P. Dale, <a href="/A054257/b054257.txt">Table of n, a(n) for n = 0..1000</a>

%e a(1)=21 -> 21{10}=23{9}=25{8}=30{7}=33{6}=41{5}=111{4}=210{3}=10101{2} -> 21232530334111121010101 is a prime.

%t Select[Range[5000],PrimeQ[FromDigits[Flatten[Table[IntegerDigits[#,n],{n,10,2,-1}]]]]&] (* _Harvey P. Dale_, May 25 2012 *)

%Y Cf. A054256, A054258.

%K nonn,base

%O 0,1

%A _Patrick De Geest_, Feb 15 2000