A167488 Primes p such that (p reversed)-6 is also a prime.

11, 31, 37, 53, 59, 71, 73, 97, 311, 313, 331, 337, 349, 353, 359, 367, 373, 379, 389, 397, 541, 547, 563, 577, 593, 701, 719, 733, 751, 757, 911, 937, 947, 953, 971, 977, 983, 991, 3001, 3011, 3037, 3049, 3061, 3079, 3083, 3109, 3137, 3163, 3167, 3191

Offset

1,1

Links

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

Example

31 ->13-6=7; 53 ->35-6=29; 73 ->37-6=31.

Mathematica

Select[Prime[Range[3, 460]], PrimeQ[FromDigits[Reverse[ IntegerDigits[ #]]]-6]&] (* Harvey P. Dale, Sep 13 2011 *)

Prog

(Magma) [p: p in PrimesInInterval(11, 4000) | IsPrime(q-6) where q is Seqint(Reverse(Intseq(p)))]; // Vincenzo Librandi, Sep 15 2013

Crossrefs

Sequence in context: A183845 A022423 A173972 * A361976 A298566 A090756

Adjacent sequences: A167485 A167486 A167487 * A167489 A167490 A167491

Keyword

nonn,base

Author

Vincenzo Librandi, Nov 05 2009

Status

approved