OFFSET
1,1
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
EXAMPLE
149 is in the sequence because 149 is prime and 149 = 2*(2+1)^2/2 + 6*(6+1)^2/2.
MATHEMATICA
f[n_] := n (n + 1)^2/2; t = Table[f[n], {n, 0, 40}]; Select[Union[Flatten[Outer[Plus, t, t]]], # < t[[-1]] && PrimeQ[#] &] (* T. D. Noe, Apr 03 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Gerasimov Sergey, Mar 26 2012
EXTENSIONS
Terms checked by R. J. Mathar, Mar 28 2012
STATUS
approved