%I #11 May 22 2025 16:40:30
%S 0,2,30,1122,24300
%N Numbers k such that k = pi(k)*(sum of the digits of k).
%C This sequence is a subsequence of A057809. There is no further term up to 16*10^6.
%C a(6) > 1.4*10^22, if it exists. - _Giovanni Resta_, Aug 31 2018
%e 24300 = pi(24300) * (2+4+3+0+0) = 2700 * 9.
%t Select[Range[0,25000],PrimePi[#]Total[IntegerDigits[#]]==#&] (* _Harvey P. Dale_, Feb 13 2023 *)
%Y Cf. A000720, A007953, A057809, A140173.
%K base,more,nonn
%O 1,2
%A _Farideh Firoozbakht_, May 15 2008