login
Values of k such that sum of first k primes squared is divisible by k-th prime.
1

%I #22 Jan 14 2023 08:44:39

%S 1,6,17,11156,16548

%N Values of k such that sum of first k primes squared is divisible by k-th prime.

%C Numbers k such that A072004(k) = 0.

%C a(6) > 10^11. - _Giovanni Resta_, Mar 07 2013

%e 6 is a term because A024450(6)/prime(6) = 29;

%e 17 is a term because A024450(17)/prime(17) = 284;

%e 11156 is a term because A024450(11156)/prime(11156) = 410066261;

%e 16548 is a term because A024450(16548)/prime(16548) = 941945317.

%t Module[{nn=17000,prs},prs=Accumulate[Prime[Range[nn]]^2];Select[Range[ nn],Divisible[prs[[#]],Prime[#]]&]] (* _Harvey P. Dale_, Nov 23 2013 *)

%Y Cf. A024450, A072004, A077023.

%K nonn,more

%O 1,2

%A _Randy L. Ekl_ and _Zak Seidov_, Oct 17 2002