OFFSET
1,4
FORMULA
a(n) = Sum_{k=1..floor(n/2)} [floor(log_10(k)) = floor(log_10(n-k))], where [ ] is the Iverson bracket.
EXAMPLE
a(11) = 4; There are 5 partitions of 11 into two parts, (10,1), (9,2), (8,3), (7,4) and (6,5). Only 4 of these partitions have the same number of decimal digits, so a(11) = 4.
MATHEMATICA
Table[Sum[KroneckerDelta[Floor[Log10[i]], Floor[Log10[n - i]]], {i, Floor[n/2]}], {n, 100}]
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Wesley Ivan Hurt, Dec 21 2020
STATUS
approved
