A167474 Primes p such that (p reversed)+10 is a square.

17, 431, 1151, 1979, 6029, 9323, 11321, 13877, 17891, 41597, 45863, 49193, 62639, 66851, 68543, 91151, 99719, 113147, 117413, 132533, 136277, 151631, 153269, 159839, 174491, 178397, 199799, 411101, 419183, 419777, 437543, 451637

Offset

1,1

Links

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

Example

17->71+10=9^2; 431->134+10=12^2; 1151->1511+10=39^2; 9323->3239+10=57^2.

Mathematica

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

Prog

(Magma) [p: p in PrimesInInterval(2, 460000) | IsSquare(q+10) where q is Seqint(Reverse(Intseq(p)))]; // Vincenzo Librandi, Sep 15 2013

Crossrefs

Sequence in context: A053114 A221443 A222648 * A158063 A370543 A301642

Adjacent sequences: A167471 A167472 A167473 * A167475 A167476 A167477

Keyword

nonn,base,less

Author

Vincenzo Librandi, Nov 04 2009

Status

approved