%I #4 Jul 17 2018 14:27:10
%S 11,23,29,41,43,47,61,67,83,89,103,107,163,211,223,229,233,239,241,
%T 269,293,307,383,421,431,433,443,449,457,461,467,479,499,503,523,547,
%U 587,607,613,631,641,647,661,677,683,701,829,853,857,863,883,929,947
%N Prime numbers in which the sum of the largest digit and the smallest digit is also a prime.
%C If there is more than one digit with the same value (like in 211) only one is counted.
%H Harvey P. Dale, <a href="/A164932/b164932.txt">Table of n, a(n) for n = 1..1000</a>
%e The sum of the largest digit and the smallest digit in the prime 947 is also a prime.
%t sldsdQ[n_]:=Module[{idn=IntegerDigits[n]},PrimeQ[Min[idn]+Max[idn]]]; Select[Prime[Range[200]],sldsdQ] (* _Harvey P. Dale_, Jul 17 2018 *)
%Y Cf. A000040, A164739
%K base,nonn
%O 1,1
%A _Parthasarathy Nambi_, Aug 31 2009