Calculate hit streaks
calc_streak(x)
x
A character vector of hits ("H") and misses ("M").
"H"
"M"
A data frame with one column, length, containing the length of each hit streak.
length
data(kobe_basket) calc_streak(kobe_basket$shot)