%I #22 Sep 17 2018 18:04:40
%S 1,1,1,2,2,3,4,5,6,8,9,11,13,14,17,19,21,23,26,27,30,32,34,36,37,39,
%T 40,42,42,44,44,45,45,47,47,47,49,48,50,50,52,52,55,55,58,60,60,64,65,
%U 68,69,73,73,77,78,82,84,84,88,88,92,92,96,96,100,100,105,107,107,113
%N Number of partitions of n into distinct decimal repdigit numbers.
%C a(n) <= A000009(n).
%C Not the same as A091581: a(n) < A091581(n) for n > 101.
%C A109967(n) = a(n+1) - a(n). - _Reinhard Zumkeller_, Jul 06 2005
%H Alois P. Heinz, <a href="/A088670/b088670.txt">Table of n, a(n) for n = 0..20000</a> (first 1001 terms from Reinhard Zumkeller)
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/Repdigit.html">Repdigit</a>
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/Partition.html">Partition</a>
%o (Haskell)
%o a088670 = p $ tail a010785_list where
%o p _ 0 = 1
%o p (k:ks) m = if m < k then 0 else p ks (m - k) + p ks m
%o -- _Reinhard Zumkeller_, Dec 10 2011
%Y Cf. A010785, A088669, A109968, A131364.
%K nonn,base
%O 0,4
%A _Reinhard Zumkeller_, Oct 03 2003
%E a(0)=1 added and offset adjusted by _Reinhard Zumkeller_, Dec 10 2011