1,2

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

16 is a term because 16*61+1=977 is prime.

Select[Range[250], PrimeQ[# IntegerReverse[#]+1]&] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Oct 05 2017 *)

Sequence in context: A134682 A327408 A083814 * A301374 A130320 A258599

Adjacent sequences: A073802 A073803 A073804 * A073806 A073807 A073808

easy,base,nonn

Shyam Sunder Gupta, Aug 23 2002

approved