login
A133525
Sum of third powers of four consecutive primes.
19
503, 1826, 3996, 8784, 15300, 26136, 48328, 73206, 117000, 173754, 228872, 302904, 401128, 537586, 685060, 882000, 1091034, 1274672, 1540730, 1811754, 2158812, 2682468, 3219730, 3740670, 4260744, 4643100, 5055696, 6011352, 7034400
OFFSET
1,1
LINKS
FORMULA
a(n) = A133530(n) + A030078(n+3). - Michel Marcus, Nov 08 2013
EXAMPLE
a(1)=503 because 2^3+3^3+5^3+7^3=503.
MAPLE
N:= 50: # for a(1)..a(N)
P3:= [0, seq(ithprime(i)^3, i=1..N+3)]:
S:= ListTools:-PartialSums(P3):
seq(S[i+4]-S[i], i=1..N); # Robert Israel, Jan 01 2024
MATHEMATICA
a = 3; Table[Prime[n]^a + Prime[n + 1]^a + Prime[n + 2]^a + Prime[n + 3]^a, {n, 1, 100}]
Total/@Partition[Prime[Range[40]]^3, 4, 1] (* Harvey P. Dale, Jan 06 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Artur Jasinski, Sep 14 2007
STATUS
approved