A206245 Number of partitions of n into repunit powers, cf. A083278.
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 4, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 5, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 6, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 8, 8, 8, 8, 8, 8, 8, 8, 8
Offset: 0
Keywords
Links
- Reinhard Zumkeller, Table of n, a(n) for n = 0..1000
- Eric Weisstein's World of Mathematics, Repunit
- Wikipedia, Repunit
- Index entries for related partition-counting sequences
Programs
-
Haskell
a206245 = p a083278_list where p _ 0 = 1 p rps'@(rp:rps) n = if n < rp then 0 else p rps' (n - rp) + p rps n
Comments