OFFSET
1,1
EXAMPLE
67 is in this sequence because 67 is prime and 3^1+4^3 = 67.
521 is in this sequence because 521 is prime and 3^2+8^3 = 521.
MATHEMATICA
f[x_, y_]:= 3^x+y^3; lst={}; Do[p=f[x, y]; If[PrimeQ[p], AppendTo[lst, p]], {y, 50}, {x, 50}]; Take[Union[lst], 50]
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Nov 27 2014
STATUS
approved