A181150 a(n) = prime(n)^3 + prime(n) + 1.

11, 31, 131, 351, 1343, 2211, 4931, 6879, 12191, 24419, 29823, 50691, 68963, 79551, 103871, 148931, 205439, 227043, 300831, 357983, 389091, 493119, 571871, 705059, 912771, 1030403, 1092831, 1225151, 1295139, 1443011, 2048511, 2248223, 2571491, 2685759, 3308099, 3443103, 3870051, 4330911, 4657631, 5177891, 5735519

Offset

1,1

Links

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

Example

a(4)=351 because the 4th prime is 7, and 7^3 + 7 + 1 = 351.

Maple

A181150 := n -> map (p -> p^(3)+p+1, ithprime(n)):
seq (A181150(n), n=1..41);

Mathematica

#^3+#+1&/@Prime[Range[50]]  (* Harvey P. Dale, Jan 25 2011 *)

Prog

(Magma) [p^3+p+1: p in PrimesUpTo(700)]; // Vincenzo Librandi, Jan 26 2011

Crossrefs

Cf. A060800.

Sequence in context: A272263 A082712 A049090 * A094622 A193645 A190781

Adjacent sequences: A181147 A181148 A181149 * A181151 A181152 A181153

Keyword

nonn,easy

Author

Jani Melik, Jan 24 2011

Status

approved