OFFSET
1,1
COMMENTS
This is a restricted or simplified version of the definition of modest numbers A054986.
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
E. Angelini, Not Modest, Mar 22 2012
E. Angelini, Not modest [Cached copy, with permission]
FORMULA
PROG
(PARI) is_nm( x )=x%10 && x%(x%10)==x\10^(#Str(x)-1)
for(n=1, 999, is_nm(n)&print1(n", "))
(Haskell)
a210582 n = a210582_list !! (n-1)
a210582_list = filter (\x -> mod x (a010879 x) == a000030 x) a067251_list
-- Reinhard Zumkeller, Mar 26 2012
(Magma) [ n: n in [1..1002] | not IsZero(d[1]) and n mod d[1] eq d[#d] where d is Intseq(n) ]; // Bruno Berselli, Mar 26 2012
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Eric Angelini and M. F. Hasler, Mar 22 2012
EXTENSIONS
Edited by M. F. Hasler, Jan 14 2014
STATUS
approved