A087769 Minimal prime whose reversal is a multiple of n-th prime.

2, 3, 5, 7, 11, 19, 43, 59, 29, 457, 13, 47, 349, 103, 257, 109, 449, 397, 431, 17, 37, 97, 233, 653, 79, 101, 127, 701, 367, 197, 3863, 131, 1627, 379, 547, 151, 587, 1667, 433, 643, 617, 181, 191, 277, 887, 599, 3709, 1973, 809, 619, 239, 659, 1747, 1877, 1433

Offset

1,1

Links

Table of n, a(n) for n=1..55.

Example

n=100, p(n)=541, minimal prime whose reversal is a multiple of 541 is 2801.

Mathematica

Module[{nn=600, irp}, irp=IntegerReverse/@Prime[Range[nn]]; Table[ IntegerReverse[ SelectFirst[irp, IntegerQ[#/p]&]], {p, Prime[Range[60]]}]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Sep 26 2020 *)

Crossrefs

Cf. A007488.

Sequence in context: A320725 A320771 A002231 * A308510 A084736 A089472

Adjacent sequences: A087766 A087767 A087768 * A087770 A087771 A087772

Keyword

easy,nonn,base

Author

Zak Seidov, Oct 03 2003

Status

approved