OFFSET
1,1
COMMENTS
Numbers k such that A055483(k) > 1. - Reinhard Zumkeller, Jun 18 2013
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
MATHEMATICA
Select[ Range[125], GCD[ #, FromDigits[ Reverse[ IntegerDigits[ # ]]]] > 1 & ]
PROG
(Haskell)
a071249 n = a071249_list !! (n-1)
a071249_list = filter ((> 1) . a055483) [1..]
-- Reinhard Zumkeller, Jun 18 2013
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, May 21 2002
EXTENSIONS
Edited by Robert G. Wilson v, Jun 07 2002
Definition corrected by N. J. A. Sloane, Aug 27 2020 following a suggestion from José Hernández Santiago
STATUS
approved