Subarreglos con elementos idénticos

Devuelve la cantidad de subarreglos que contienen solo elementos idénticos. Un subarreglo de un solo elemento también cuenta.

countIdentical([[1], [2], [3], [4]]) // 4
countIdentical([[1, 2], [2, 3], [3, 4], [4, 4]]) // 1