A060429 a(n) = 4*prime(n)^2+1.

17, 37, 101, 197, 485, 677, 1157, 1445, 2117, 3365, 3845, 5477, 6725, 7397, 8837, 11237, 13925, 14885, 17957, 20165, 21317, 24965, 27557, 31685, 37637, 40805, 42437, 45797, 47525, 51077, 64517, 68645, 75077, 77285, 88805

Offset

1,1

Links

Harry J. Smith, Table of n, a(n) for n = 1..100

Formula

a(n) = 4*A001248(n) + 1. - Vincenzo Librandi, Dec 17 2013

Maple

A060429:=n->4*ithprime(n)^2+1; seq(A060429(n), n=1..100); # Wesley Ivan Hurt, Dec 17 2013

Mathematica

Table[4*Prime[n]^2+1, {n, 100}] (* Wesley Ivan Hurt, Dec 17 2013 *)

Prog

(PARI) { n=0; forprime (p=1, 542, write("b060429.txt", n++, " ", 4*p^2 + 1); ) } \\ Harry J. Smith, Jul 05 2009

Crossrefs

Cf. A001248, A052291, A052292.

Sequence in context: A141886 A350096 A269240 * A052292 A154301 A057185

Adjacent sequences: A060426 A060427 A060428 * A060430 A060431 A060432

Keyword

nonn,easy

Author

Jason Earls, Apr 06 2001

Status

approved