Еще раз спасибо всем, я не могу поверить, как далеко это зашло. Почти там.
Как расширить функцию длины.
т.е.
Я могу сосчитать {1,3} по Length[{1,3}]
{1,3}
Length[{1,3}]
2
Но как рассчитать длину каждого набора в списке {{1,3}, {1,1,3}, ...}?
{{1,3}, {1,1,3}, ...}
Просто попробуйте
Length /@ {{1},{1,2,3}}
Что является сокращением:
Map[Length, {{1},{1,2,3}}]
Map применяет функцию (в данном случае Length[]) для поэлементных списков.
Map
Length[]