OFFSET
1,2
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..9014 from T. D. Noe)
W. Schneider, The First 1,000 Lucky Number.
EXAMPLE
133 is in the sequence because (1) it is a lucky number and (2) the reversal 331 is also a lucky number.
MATHEMATICA
nn = 10^3; t = Range[1, nn, 2]; sieve[n_] := Module[{k = t[[n]]}, t = Delete[t, Table[{i}, {i, k, Length[t], k}]]]; n = 1; While[t[[n]] < Length[t], n++; sieve[n]]; tr = Table[FromDigits[Reverse[IntegerDigits[i]]], {i, t}]; Intersection[t, tr] (* T. D. Noe, Mar 16 2013 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Luc Stevens (lms022(AT)yahoo.com), May 07 2006
EXTENSIONS
Corrected and extended by Adam Panagos (adam.panagos(AT)gmail.com), May 10 2006
957 removed by T. D. Noe, Mar 16 2013
STATUS
approved