|
%I #9 Apr 29 2015 11:24:02
%S 3123,17748,46228,129124,257044,522244,1200964,2040964,3784804,
%T 6330724,9042244,12998404,19014724,28306324,38733364,54004804,
%U 71526004,87806884,112911124,140218324,177548884,237679924,302790244,367882804,436220164
%N Sum of fourth powers of four consecutive primes.
%H Charles R Greathouse IV, <a href="/A133526/b133526.txt">Table of n, a(n) for n = 1..10000</a>
%F a(n) = A133531(n) + A030514(n+3). - _Michel Marcus_, Nov 08 2013
%F a(n) ~ 4n^4 log^4 n. - _Charles R Greathouse IV_, Apr 29 2015
%e a(1)=3123 because 2^4+3^4+5^4+7^4=3123.
%t a = 4; Table[Prime[n]^a + Prime[n + 1]^a + Prime[n + 2]^a + Prime[n + 3]^a, {n, 1, 100}]
%t Total/@Partition[Prime[Range[30]]^4,4,1] (* _Harvey P. Dale_, Sep 09 2014 *)
%o (PARI) a(n)=sum(i=n,n+3,prime(i)^4) \\ _Charles R Greathouse IV_, Apr 29 2015
%Y Cf. A034963, A133524, A133525, A133527, A133528.
%K nonn
%O 1,1
%A _Artur Jasinski_, Sep 14 2007
|
