Tucker_Mystic <- x %>%
select(Pitcher, AutoPitchType, RelSpeed, SpinRate, Tilt, HorzBreak, VertBreak)%>%
filter(Pitcher == "Tucker, Aidan")
Tucker_Mystic
## # A tibble: 28 × 7
## Pitcher AutoPitchType RelSpeed SpinRate Tilt HorzBreak VertBreak
## <chr> <chr> <dbl> <dbl> <time> <dbl> <dbl>
## 1 Tucker, Aidan Slider 82.9 2380. 09:15 -3.59 -40.2
## 2 Tucker, Aidan Sinker 90.1 2213. 01:45 14.2 -22.9
## 3 Tucker, Aidan Four-Seam 90.6 2287. 12:45 6.42 -17.5
## 4 Tucker, Aidan Sinker 89.2 2295. 01:45 15.2 -23.9
## 5 Tucker, Aidan Changeup 81.8 1353. 01:15 5.17 -35.5
## 6 Tucker, Aidan Slider 82.4 2143. 10:00 -3.42 -39.6
## 7 Tucker, Aidan Slider 81.2 2231. 11:15 -1.61 -38.4
## 8 Tucker, Aidan Sinker 88.8 2204. 01:45 14.9 -22.8
## 9 Tucker, Aidan Slider 80.6 2159. 11:15 -1.77 -38.3
## 10 Tucker, Aidan Changeup 80.9 1258. 12:30 1.75 -35.1
## 11 Tucker, Aidan Changeup 82.5 1359. 01:30 6.58 -34.1
## 12 Tucker, Aidan Slider 81.5 2204. 09:30 -5.57 -41.1
## 13 Tucker, Aidan Sinker 89.6 2263. 02:00 14.6 -26.8
## 14 Tucker, Aidan Sinker 88.2 2232. 02:15 14.7 -28.7
## 15 Tucker, Aidan Sinker 88.5 2172. 01:45 14.2 -23.0
## 16 Tucker, Aidan Sinker 88.6 2190. 01:45 15.1 -23.7
## 17 Tucker, Aidan Changeup 87.2 2194. 01:45 16.3 -25.0
## 18 Tucker, Aidan Four-Seam 88.1 2177. 01:15 13.2 -20.6
## 19 Tucker, Aidan Slider 81.2 2132. 11:30 -1.15 -36.7
## 20 Tucker, Aidan Slider 79.9 2174. 09:45 -3.88 -41.8
## 21 Tucker, Aidan Changeup 80.6 1301. 01:30 1.81 -40.6
## 22 Tucker, Aidan Slider 81.2 2272. 09:15 -2.76 -42.0
## 23 Tucker, Aidan Slider 82.4 2305. 06:45 -0.995 -44.1
## 24 Tucker, Aidan Four-Seam 88.9 2202. 12:45 6.18 -21.5
## 25 Tucker, Aidan Slider 82.2 2334. 09:00 -5.97 -41.4
## 26 Tucker, Aidan Slider 81.3 2229. 08:30 -8.51 -44.6
## 27 Tucker, Aidan Four-Seam 89.4 2227. 01:15 12.1 -20.4
## 28 Tucker, Aidan Slider 81.3 2337. 09:30 -3.35 -41.3