OFFSET
0,5
EXAMPLE
First Platonic numbers: 1, 4, 6, 8, 10, 12, 19, 20, ...
a(10) = #{10, 8+1+1, 6+4, 6+1+1+1+1, 4+4+1+1, 4+6x1, 10x1} = 7;
a(11) = #{10+1, 8+1+1+1, 6+4+1, 6+5x1, 4+4+1+1+1, 4+7x1, 11x1} = 7;
a(12) = #{12, 10+1+1, 8+4, 8+1+1+1+1, 6+6, 6+4+1+1, 6+6x1, 4+4+4, 4+4+1+1+1+1, 4+8x1, 12x1} = 11;
a(13) = #{12+1, 10+1+1+1, 8+4+1, 8+5x1, 6+6+1, 6+4+1+1+1, 6+7x1, 4+4+4+1, 4+4+5x1, 4+9x1, 13x1} = 11;
a(14) = #{12+1+1, 10+4, 10+1+1+1+1, 8+6, 8+4+1+1, 8+6x1, 6+6+1+1, 6+4+4, 6+4+1+1+1+1, 6+8x1, 4+4+4+1+1, 4+4+6x1, 4+10x1, 14x1} = 14;
a(15) = #{12+1+1+1, 10+4+1, 10+5x1, 8+6+1, 8+4+1+1+1, 8+7x1, 6+6+1+1+1, 6+4+4+1, 6+4+5x1, 6+9x1, 4+4+4+1+1+1, 4+4+7x1, 4+11x1, 15x1} = 14;
a(16) = #{12+4, 12+1+1+1+1, 10+6, 10+4+1+1, 10+6x1, 8+8, 8+6+1+1, 8+4+4, 8+4+1+1+1+1, 8+8x1, 6+6+4, 6+6+1+1+1+1, 6+4+4+1+1, 6+4+6x1, 6+10x1, 4+4+4+4, 4+4+4+1+1+1+1, 4+4+8x1, 4+12x1, 16x1} = 20.
PROG
(Haskell)
a226748 = p a053012_list where
p _ 0 = 1
p ks'@(k:ks) m = if m < k then 0 else p ks' (m - k) + p ks m
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Jun 17 2013
STATUS
approved