Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #12 Nov 21 2013 12:49:34
%S 11,23,29,31,41,47,61,67,71,89,103,107,131,151,181,191,211,223,229,
%T 233,239,241,251,263,269,271,281,283,293,307,311,331,421,431,449,457,
%U 461,467,479,487,491,499,503,521,523,541,547,571,607,631,641,647,661,677
%N Primes with sum of smallest digit and final digit is a prime.
%F a(n) ~ (4/3) n log n since almost all primes not ending in 1 are in this sequence, and only o(x^0.96) primes ending in 1 are in this sequence. - _Charles R Greathouse IV_, Jan 02 2013
%e 11(1+1=2=prime), 23(2+3=5=prime), 29(2+9=11=prime), 31(1+1=2=prime), etc.
%t sldpQ[n_]:=Module[{idn=IntegerDigits[n]},PrimeQ[Min[idn]+Last[idn]]]; Select[Prime[Range[150]],sldpQ] (* _Harvey P. Dale_, May 09 2012 *)
%o (PARI) is(n)=my(d=digits(n));isprime(vecmin(d)+d[#d]) && isprime(n) \\ _Charles R Greathouse IV_, Jan 02 2013
%Y Cf. A000040.
%K nonn,base
%O 1,1
%A _Juri-Stepan Gerasimov_, Feb 24 2009
%E Second 151 replaced by 251, 643 removed by _R. J. Mathar_, Feb 26 2009