

A155211


Numbers n such that n^4+(n+1)^4 is a prime.


13



1, 2, 3, 4, 6, 8, 9, 12, 13, 14, 16, 25, 26, 27, 31, 33, 34, 36, 37, 38, 40, 43, 48, 54, 63, 67, 68, 72, 74, 78, 82, 87, 88, 89, 97, 98, 104, 105, 109, 110, 111, 119, 121, 122, 123, 129, 145, 156, 157, 162, 163, 166, 167, 172, 173, 179, 180, 182, 184, 186, 187, 189, 195
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,2


LINKS

Vincenzo Librandi, Table of n, a(n) for n = 1..1000


MATHEMATICA

f[n_]:=n^4+(n+1)^4; lst={}; Do[a=f[n]; If[PrimeQ[a], AppendTo[lst, n]], {n, 0, 5!}]; lst (* Vladimir Joseph Stephan Orlovsky, May 30 2009 *)
Select[Range[200], PrimeQ[#^4+(#+1)^4]&] (* Harvey P. Dale, Jun 15 2013 *)


PROG

(MAGMA) [n: n in [1..200]  IsPrime(n^4+(n+1)^4)]; // Vincenzo Librandi, Aug 31 2012


CROSSREFS

Cf. A153504, A154535.
Sequence in context: A085500 A265414 A189291 * A206716 A010385 A095037
Adjacent sequences: A155208 A155209 A155210 * A155212 A155213 A155214


KEYWORD

nonn,easy


AUTHOR

Vincenzo Librandi, Jan 22 2009


STATUS

approved



