%I #14 Dec 19 2022 16:40:24
%S 1,1,2,2,3,1,2,3,5,3,4,2,3,3,3,3,5,2,6,5,4,6,7,6,3,4,8,3,4,6,4,6,7,2,
%T 4,4,6,1,5,2,4,5,3,5,4,6,5,3,7,3,5,5,3,6,7,5,4,5,4,6,5,7,3,5,4,6,5,5,
%U 3,4,7,8,6,6,6,5,5,6,8,5,5
%N Number of distinct prime factors of floor(Pi*10^n), Pi=3.14...
%F a(n) = A001221(A011545(n)).
%e n=6: floor(Pi*10^6) = 3141592 = 2*2*2*392699: a(6)=2.
%t Table[PrimeNu[Floor[Pi 10^n]],{n,0,80}] (* _Harvey P. Dale_, Dec 19 2022 *)
%Y Cf. A001221, A011545, A089283, A000796.
%K nonn
%O 0,3
%A _Reinhard Zumkeller_, Oct 30 2003
%E More terms from _Ray Chandler_, Oct 31 2003
|