login
A122428
Numbers m such that in decimal representation the lexicographically greatest divisor of m equals the greatest prime factor of m.
2
1, 2, 3, 5, 7, 10, 11, 13, 14, 15, 17, 19, 20, 21, 23, 25, 28, 29, 31, 35, 37, 41, 42, 43, 47, 49, 53, 59, 61, 67, 71, 73, 79, 83, 89, 97, 101, 103, 105, 106, 107, 109, 111, 113, 118, 122, 123, 125, 127, 129, 131, 134, 137, 139, 141, 142, 146, 147, 149, 151, 157, 158
OFFSET
1,2
COMMENTS
A122425(a(n)) = A006530(a(n));
A008578 is a subsequence.
LINKS
PROG
(Haskell)
a122428 n = a122428_list !! (n-1)
a122428_list = [x | x <- [1..], a122425 x == a006530 x]
-- Reinhard Zumkeller, Feb 05 2015
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Reinhard Zumkeller, Sep 04 2006
STATUS
approved