login
Primes that are concatenations of n with n + 3.
1

%I #7 Mar 25 2015 16:32:48

%S 47,811,1013,1619,4447,4649,5659,5861,6871,7477,8689,9497,98101,

%T 100103,104107,106109,136139,140143,148151,154157,158161,160163,

%U 166169,176179,184187,194197,206209,230233,244247,250253,254257

%N Primes that are concatenations of n with n + 3.

%H Harvey P. Dale, <a href="/A032626/b032626.txt">Table of n, a(n) for n = 1..1000</a>

%t Select[Table[FromDigits[Join[IntegerDigits[n],IntegerDigits[n+3]]],{n,300}],PrimeQ] (* _Harvey P. Dale_, Mar 25 2015 *)

%Y Cf. A032608, A032618.

%K nonn,base

%O 1,1

%A _Patrick De Geest_, May 15 1998