login
A118959
Non-palindromic numbers which are divisible by their reversal.
6
10, 20, 30, 40, 50, 60, 70, 80, 90, 100, 110, 200, 220, 300, 330, 400, 440, 500, 510, 540, 550, 600, 660, 700, 770, 800, 810, 880, 900, 990, 1000, 1010, 1100, 1110, 1210, 1310, 1410, 1510, 1610, 1710, 1810, 1910, 2000, 2020, 2100, 2120, 2200, 2220, 2320, 2420
OFFSET
1,1
COMMENTS
A004086(a(n)) = A027751(a(n),k) for some k: 1 <= k < A001221(n); A031877 contains all terms not ending with zero. - Reinhard Zumkeller, Jul 15 2013
LINKS
EXAMPLE
510 is in the sequence because 510 is a non-palindromic number divisible by its reversal 15.
MATHEMATICA
Select[Range[2420], !PalindromeQ[#]&&Divisible[#, IntegerReverse[#]]&] (* James C. McMahon, Sep 13 2024 *)
PROG
(Haskell)
a118959 n = a118959_list !! (n-1)
a118959_list = filter
(\x -> let x' = a004086 x in x' /= x && x `mod` x' == 0) [1..]
-- Reinhard Zumkeller, Jul 15 2013
CROSSREFS
Subsequence of A029742; A031877 is a subsequence.
Sequence in context: A008592 A158814 A359173 * A273239 A343452 A043489
KEYWORD
base,nonn
AUTHOR
Luc Stevens (lms022(AT)yahoo.com), May 25 2006
STATUS
approved