cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A131276 Numbers m such that m divides Sum_{k=1..m} prime(k)^16.

This page as a plain text file.
%I A131276 #27 Nov 24 2024 01:52:33
%S A131276 1,3131,6289,323807,443371,83802527023,4076111200313
%N A131276 Numbers m such that m divides Sum_{k=1..m} prime(k)^16.
%C A131276 a(7) > 10^11. - _Paul W. Dyson_, Dec 30 2020
%C A131276 a(8) > 4.1*10^12. - _Bruce Garner_, Mar 24 2021
%C A131276 a(8) > 2*10^15. - _Paul W. Dyson_, Nov 23 2024
%H A131276 OEIS Wiki, <a href="https://oeis.org/wiki/Sums_of_primes_divisibility_sequences">Sums of powers of primes divisibility sequences</a>.
%t A131276 s = 0; Do[s = s + Prime[n]^16; If[ Mod[s, n] == 0, Print[n]], {n, 500000}]
%t A131276 Transpose[Select[With[{nn=500000},Thread[{Range[nn],Accumulate[ Prime[ Range[nn]]^16]}]], Divisible[ #[[2]],#[[1]]]&]][[1]]
%Y A131276 Cf. A085450 (smallest m > 1 such that m divides Sum_{k=1..m} prime(k)^n).
%Y A131276 Cf. A007504, A045345, A171399, A128165, A233523, A050247, A050248.
%Y A131276 Cf. A024450, A111441, A217599, A128166, A233862, A217600, A217601.
%K A131276 more,nonn,less
%O A131276 1,2
%A A131276 _Alexander Adamchuk_, Jun 25 2007
%E A131276 a(6) from _Paul W. Dyson_, Dec 30 2020
%E A131276 a(7) from _Bruce Garner_, Mar 24 2021