OFFSET
1,24
COMMENTS
LINKS
Olivier Gérard, Table of n, a(n) for n = 1..215307
EXAMPLE
The array begins
0
0,0
0,1,0
0,1,0,0,0
0,1,1,0,0,0,0
0,1,1,0,0,2,0,0,1,0,0
0,1,1,0,1,2,0,0,0,1,0,0,0,0,0
0,1,1,0,1,2,0,0,2,0,1,0,0,1,1,1,0,0,0,0,0,0
0,1,1,0,1,2,0,1,2,0,1,0,0,2,1,1,1,0,0,1,0,0,1,1,0,0,1,0,0,0
...
MATHEMATICA
Flatten @ Table[
Map[Length[Union[#]] - Length[Union[Length /@ Split[#]]] &,
IntegerPartitions[n]], {n, 1, 20}]
CROSSREFS
KEYWORD
nonn,tabf
AUTHOR
Olivier Gérard, May 29 2024
STATUS
approved