login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A128168 Numbers n such that n divides 1 + Sum[ Prime[k]^4, {k,1,n} ] = 1 + A122102(n). 1
1, 2, 3, 4, 5, 6, 8, 9, 10, 12, 15, 16, 20, 24, 27, 30, 32, 39, 40, 45, 48, 58, 60, 80, 88, 90, 96, 100, 120, 138, 168, 180, 207, 216, 240, 328, 342, 353, 360, 456, 470, 480, 496, 564, 591, 768, 840, 1040, 1215, 1276, 1355, 1360, 1395, 1440, 1600, 2208, 2576, 2904 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

a(216) > 4*10^10. - Robert Price, Dec 17 2013

LINKS

Robert Price, Table of n, a(n) for n = 1..215

OEIS Wiki, Sums of powers of primes divisibility sequences

MATHEMATICA

s = 1; Do[s = s + Prime[n]^4; If[ Mod[s, n] == 0, Print[n]], {n, 17500}]

CROSSREFS

Cf. A085450 = smallest m > 1 such that m divides Sum_{k=1..m} prime(k)^n.

Cf. A007504, A045345, A171399, A128165, A233523, A050247, A050248.

Cf. A024450, A111441, A217599, A128166, A233862, A217600, A217601.

Sequence in context: A018609 A243390 A029461 * A232823 A018412 A061945

Adjacent sequences:  A128165 A128166 A128167 * A128169 A128170 A128171

KEYWORD

nonn

AUTHOR

Alexander Adamchuk, Feb 22 2007

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified July 16 12:19 EDT 2019. Contains 325079 sequences. (Running on oeis4.)