%I #11 Sep 02 2023 15:36:04
%S 3,31,159,352,169,314159,392701,10166,7995,9787003,28954814,
%T 157079632681,68250087,4349287,67757089,1002742628275,1230782,
%U 1307585156,14846149,1296180,1024025943,452477425,1492388104
%N Sum of distinct prime factors of floor(Pi*10^n), Pi=3.14....
%F a(n) = A008472(A011545(n)).
%e n=6: floor(Pi*10^6) = 3141592 = 2*2*2*392699: a(6) = 2 + 392699 = 392701.
%t Table[Total[FactorInteger[Floor[Pi 10^n]][[;;,1]]],{n,0,30}] (* _Harvey P. Dale_, Sep 02 2023 *)
%Y Cf. A089287, A089285, A089282, A000796.
%K nonn
%O 0,1
%A _Reinhard Zumkeller_, Oct 30 2003