Podzbiór zbioru

W poprzednim ćwiczeniu użyto funkcji subseq() do wyodrębnienia fragmentu pojedynczej sekwencji. Teraz spróbuj zastosować subseq() na zbiorze złożonym z 3 sekwencji. Argumenty są takie same jak poprzednio: object, start i end. Dwa ostatnie powinny mieć postać wektora – po jednej wartości dla każdej sekwencji w zbiorze.

subseq(zikaSet, 
        start = c(20, 40, 2), 
        end = c(50, 45, 22)
     )

Jaka jest szerokość sekwencji po wyodrębnieniu podzbioru?