OFFSET
1,3
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
Sum of digits of 19 is 10 (1+9=10); "19" and "10" share the digit "1".
MATHEMATICA
Select[Range[0, 200], Length[Intersection[IntegerDigits[#], IntegerDigits[ Total[ IntegerDigits[ #]]]]]>0&] (* Harvey P. Dale, Dec 16 2019 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Eric Angelini, Jun 15 2005
STATUS
approved