login
Sum of distinct prime factors of floor(Pi*10^n), Pi=3.14....
3

%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