A102607 - OEIS

%I #6 Mar 30 2012 17:29:21

%S 3,4,5,7,12,17,24,28,33,35,37,39,40,41,50,55,58,62,66,67,75,77,79,80,

%T 90,91,97,104,109,116,125,137,141,160,174,176,186,189,195,207,211,223,

%U 227,236,241,245,257,273,277,279,288,290,297,300,304,305,313,314,333,336

%N Numbers L such that 1LMN1 is prime, where M=L+1 and N=M+1.

%e If L=3, then M=4 and N=5 and 13451 is prime.

%e If L=35, then M=36 and N=37 and 13536371 is prime.

%e If L=67, then M=68 and N=69 and 16768691 is prime.

%t Select[Range[340], PrimeQ[FromDigits[Flatten[IntegerDigits /@ {1, #, # + 1, # + 2, 1}]]] &]

%Y Cf. A102606, A102608.

%K nonn,base

%O 1,1

%A _Parthasarathy Nambi_, Jan 29 2005

%E Extended by _Ray Chandler_, Jan 30 2005