%I #6 Sep 28 2018 21:40:23
%S 0,1,1,1,2,1,1,1,0,2,4,1,2,1,3,2,4,3,3,4,3,2,2,3,5,3,4,0,3,3,2,3,7,7,
%T 1,4,4,3,2,4,9,3,5,5,3,4,7,5,5,6,4,6,4,4,11,5,5,4,6,8,6,8,4,7,0,8,8,
%U 10,7,4,3,3,12,6,13,9,3,5,5,9,11,12,7,3,8,3,8,12,11,8,4
%N Number of primes of the form k^3 + n^2 for 0 <= k <= n.
%F a(n) = 0 if n is a cube other than 1.
%o (PARI) for(n=0,90,a=sum(k=0,n,isprime(k^3+n^2));print1(a", "))
%Y Cf. A066649.
%K nonn
%O 0,5
%A _Gionata Neri_, Sep 09 2018
|