A138693 Numbers of the form 110 + p^2. (where p is a prime).
114, 119, 135, 159, 231, 279, 399, 471, 639, 951, 1071, 1479, 1791, 1959, 2319, 2919, 3591, 3831, 4599, 5151, 5439, 6351, 6999, 8031, 9519, 10311, 10719, 11559, 11991, 12879, 16239, 17271, 18879, 19431, 22311, 22911, 24759, 26679, 27999, 30039
Offset: 1
Crossrefs
Programs
-
Maple
A138693:=n->110+ithprime(n)^2: seq(A138693(n), n=1..50); # Wesley Ivan Hurt, Sep 13 2014
-
Mathematica
Table[2*55 + Prime[p + 1]^2, {p, 0, 100}] #^2+110&/@Prime[Range[40]] (* Harvey P. Dale, Jan 21 2012 *)
-
PARI
a(n) = 110 + prime(n)^2; \\ Michel Marcus, Sep 14 2014
Formula
a(n) = 110 + A000040(n)^2. - Wesley Ivan Hurt, Sep 13 2014
a(n) = 110 + A001248(n). - Michel Marcus, Sep 14 2014
Comments