|
|
A077022
|
|
Values of k such that sum of first k primes squared is divisible by k-th prime.
|
|
1
|
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Numbers k such that A072004(k) = 0.
|
|
LINKS
|
|
|
EXAMPLE
|
6 is a term because A024450(6)/prime(6) = 29;
17 is a term because A024450(17)/prime(17) = 284;
11156 is a term because A024450(11156)/prime(11156) = 410066261;
16548 is a term because A024450(16548)/prime(16548) = 941945317.
|
|
MATHEMATICA
|
Module[{nn=17000, prs}, prs=Accumulate[Prime[Range[nn]]^2]; Select[Range[ nn], Divisible[prs[[#]], Prime[#]]&]] (* Harvey P. Dale, Nov 23 2013 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|