A368920 - OEIS

%I #10 Jan 14 2024 20:35:10

%S 8,80,781,7752,77275,772088,7718342,77161311

%N Number of terms of A368904 less than 10^n, where A368904 gives the numbers k for which there is no prime p such that p^p divides A342001(k).

%o (PARI)\\ Needs also program from A368914:

%o tp=10; s=0; for(n=1,10^10,s+=A368914(n); if(1+n==tp,print1(s,", "),if(n==tp, tp *= 10)));

%Y Cf. A003415, A342001, A359550, A368904, A368914.

%Y Cf. also A368911, A368919.

%K nonn

%O 1,1

%A _Antti Karttunen_, Jan 14 2024