Как суммировать последовательные идентичные числа в списке в kdb?

Question

У меня есть список, как это:

a:1 1 1 1 2 3 1 1 4 4 4 5 6 4 

Как я могу суммировать все подряд одинаковых чисел в a, так что он станет:

a:4 2 3 2 12 5 6 4 

Answer 1

Есть много способов - один метод:

q) a:1 1 1 1 2 3 1 1 4 4 4 5 6 4 
q) sum each where[differ a] _ a 
    4 2 3 2 12 5 6 4