A089332 - OEIS

%I #13 Jul 05 2021 10:56:46

%S 30,15,31,17,23,10,26,13,20,17,5,22,30,7,15,12,20,18,16,4,32,20,8,16,

%T 24,12,10,28,16,25,13,21,10,8,36,25,33,21,0,28,17,35,4,32,51,0,8,47,

%U 55,14,23,1,10,59,17,46,45,13,52,31,20,38,27,26,45,3,82,21,20,39,37,46,85,4,43,92,-9,60,48,57,26,15,64,73,32,31,50,49,38

%N a(n) = floor(10*(primepi((n+1)^2) - primepi(n^2) - 2*n/sqrt(n)+4)).

%F a(n) = floor(10*(primepi((n+1)^2) - primepi(n^2) - 2*n/sqrt(n)+4)).

%t digits=5*200

%t a=Table[Floor[10*(PrimePi[(n+1)^2]-PrimePi[n^2]-2*n/Sqrt[n]+4)], {n, 4, digits}]

%K sign,less

%O 1,1

%A _Roger L. Bagula_, Jan 03 2004