%I #9 Sep 30 2015 18:10:07
%S 3,91,136,300,325,703,1081,1378,1711,3160,3655,7750,9730,11026,11476,
%T 12880,13861,18145,18721,19900,36046,70876,75466,76636,79003,90100,
%U 92665,99235,107416,108811,110215,113050,118828,123256,130816,137026
%N Triangular numbers whose digit reversal is prime; trailing zeros are permitted.
%H Harvey P. Dale, <a href="/A115704/b115704.txt">Table of n, a(n) for n = 1..1000</a>
%e 703=T(73) and 307 is prime.
%t Select[Accumulate[Range[600]],PrimeQ[FromDigits[ Reverse[ IntegerDigits[ #]]]]&] (* _Harvey P. Dale_, Sep 30 2015 *)
%Y Cf. A115705.
%K nonn,base
%O 1,1
%A _Giovanni Resta_, Jan 31 2006
|