OFFSET
1,1
LINKS
K. D. Bajpai, Table of n, a(n) for n = 1..3810
EXAMPLE
2077681 is in the sequence because (113^3 + 127^3 + 131^3 + 137^3)/4 = 2077681 which is prime.
16244203 is in the sequence because (241^3 + 251^3 + 257^3 + 263^3)/4 = 16244203 which is prime.
MAPLE
KD := proc() local a, b, d, e, g; a:=ithprime(n); b:=ithprime(n+1); d:=ithprime(n+2); e:=ithprime(n+3); g:=(a^3+b^3+d^3+e^3)/4; if g=floor(g) and isprime(g) then RETURN (g); fi; end: seq(KD(), n=1..5000);
MATHEMATICA
Select[Mean/@Partition[Prime[Range[2000]]^3, 4, 1], PrimeQ] (* Harvey P. Dale, Oct 12 2020 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
K. D. Bajpai, Dec 26 2013
STATUS
approved