|
%I #13 Mar 25 2019 14:00:41
%S 101,10301,1300031,1003001,100404001,100030001,10060006001,
%T 10000500001,1000030300001,1000008000001,140000000000041,
%U 300000020000003,10000003030000001,10000000500000001,1000000400040000001,1000000008000000001,100000000303000000001
%N Smallest palindromic prime containing exactly n zeros.
%H Chai Wah Wu, <a href="/A083981/b083981.txt">Table of n, a(n) for n = 1..500</a>
%t Table[d = 0; i = 1;
%t While[ x = IntegerDigits[Prime[i]];
%t x != Reverse[x] || Count[x, d] != n , i++];
%t FromDigits[x], {n, 1, 5}] (* _Robert Price_, Mar 25 2019 *)
%Y Cf. A083972, A083973, A083974, A083975, A083976, A083977, A083978, A083979, A083980.
%K base,nonn
%O 1,1
%A _Amarnath Murthy_ and Meenakshi Srikanth (menakan_s(AT)yahoo.com), May 21 2003
%E Corrected and extended by _Giovanni Resta_, Feb 08 2006
|
