Se termina la funcion compress-sequence, vale aclarar que los test
funcionan, dado que en los strings los llama con apply str