|
%I #10 Mar 09 2023 17:26:38
%S 51,130,370,8201,73270,82080,26113610,4854248220,37682961610
%N Numbers n such that pi(n) = reversal(n).
%C This sequence has only two odd terms, i.e., 51 and 8201 and 10 divides all other terms. Next term is greater than 10^8.
%e 26113610 is in the sequence because
%e pi(26113610) = 1631162 = reversal(26113610).
%t Do[If[PrimePi[m]==FromDigits[Reverse[IntegerDigits[m]]], Print[m]], {m, 100000000}]
%Y Cf. A037171, A069215.
%K base,nonn
%O 1,1
%A _Farideh Firoozbakht_, Aug 25 2004
%E Two more terms from _Giovanni Resta_, Feb 06 2006
|
