A167470 Primes p such that (p reversed)+ 8 is a square.

29, 37, 71, 127, 293, 311, 353, 359, 613, 631, 677, 881, 1049, 1423, 1481, 1657, 1693, 1801, 2953, 2999, 3761, 6101, 6571, 6959, 7103, 7109, 7121, 7127, 8291, 8821, 8837, 10601, 10883, 12161, 12547, 14249, 14411, 16943, 16979, 18217, 18433, 18671, 29021

Offset

1,1

Links

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

Example

29 is in the sequence because 92+8 = 10^2.
37 is in the sequence because 73+8 = 9^2.

Mathematica

Select[Prime[Range[40000]], IntegerQ[Sqrt[FromDigits[Reverse[IntegerDigits[#]]] + 8]]&] (* Vincenzo Librandi, Sep 15 2013 *)

Prog

(Magma) [p: p in PrimesUpTo(29021) | IsSquare(q+8) where q is Seqint(Reverse(Intseq(p)))]; // Vincenzo Librandi, Sep 15 2013

Crossrefs

Sequence in context: A139895 A304688 A341174 * A152865 A333422 A108272

Adjacent sequences: A167467 A167468 A167469 * A167471 A167472 A167473

Keyword

nonn,base

Author

Vincenzo Librandi, Nov 04 2009

Extensions

Removed the constraint on the squares (an arbitrary large number) by R. J. Mathar, Oct 28 2010

Status

approved