%I #9 Mar 15 2020 15:27:47
%S 3,5,7,9,11,15,17,19,21,25,27,29,31,33,35,37,39,41,43,45,49,51,55,57,
%T 59,63,65,67,69,71,73,75,77,81,85,87,91,95,97,99,101,105,109,111,113,
%U 123,125,127,129,131,133,135,137,139,145,149,155,157,159,161,163,165,167
%N Odd numbers n with odd largest digit of prime(n).
%H Harvey P. Dale, <a href="/A155113/b155113.txt">Table of n, a(n) for n = 1..1000</a>
%e 3(prime(3)=5=odd)=a(1), 5(prime(5)=11(1=odd))=a(2), 7(prime(7)=17(7=odd))=a(3), etc.
%t Select[Range[1,201,2],OddQ[Max[IntegerDigits[Prime[#]]]]&] (* _Harvey P. Dale_, Mar 15 2020 *)
%Y Cf. A000027, A000040.
%K nonn,base
%O 1,1
%A _Juri-Stepan Gerasimov_, Jan 20 2009
%E Corrected (9 inserted, 13 removed, 27 inserted, 69 inserted etc.) by _R. J. Mathar_, May 10 2010