Pitcher | Pitch | N | Balls | Strikes | Strike_Percentage | Ball_Percentage |
|---|---|---|---|---|---|---|
Voli | Changeup | 40 | 16 | 24 | 60.00% | 40.00% |
Voli | Curveball | 16 | 10 | 6 | 37.50% | 62.50% |
Voli | Four-Seam | 3 | 2 | 1 | 33.33% | 66.67% |
Voli | Sinker | 2 | 2 | 0 | 0.00% | 100.00% |
Voli | Slider | 2 | 1 | 1 | 50.00% | 50.00% |
Pitcher | Pitch | N | Balls | Strikes | Velo | Spin Rate | Vert Break | Horizontal Break | Tilt | Strike_Percentage | Ball_Percentage |
|---|---|---|---|---|---|---|---|---|---|---|---|
Voli | Changeup | 40 | 16 | 24 | 80.11696 | 2,010.519 | 17.41561 | 11.091980 | 70.5000 | 60.00% | 40.00% |
Voli | Curveball | 16 | 10 | 6 | 71.47325 | 2,385.743 | 0.67536 | -8.577361 | 131.4844 | 37.50% | 62.50% |
Voli | Four-Seam | 3 | 2 | 1 | 83.71419 | 2,356.715 | 21.97509 | 13.636110 | 16.2500 | 33.33% | 66.67% |
Voli | Sinker | 2 | 2 | 0 | 86.86382 | 2,138.980 | 11.36075 | 19.787140 | 30.0000 | 0.00% | 100.00% |
Voli | Slider | 2 | 1 | 1 | 75.90180 | 2,488.553 | 12.79222 | -2.732190 | 172.5000 | 50.00% | 50.00% |
Voli_Keene <- x %>%
filter(BatterTeam == "KEE_SWA") %>%
select(Pitcher, AutoPitchType, RelSpeed, SpinRate, Tilt, HorzBreak, InducedVertBreak)
Voli_Keene
## Pitcher AutoPitchType RelSpeed SpinRate Tilt HorzBreak InducedVertBreak
## 1 Voli Four-Seam 82.96845 2255.434 15.00 12.29245 21.77942
## 2 Voli Curveball 74.97439 2525.223 150.00 -5.72402 4.87622
## 3 Voli Slider 75.17072 2536.695 180.00 -0.44020 14.67698
## 4 Voli Slider 76.63288 2440.411 165.00 -5.02418 10.90745
## 5 Voli Changeup 83.00003 2360.072 15.00 12.22981 20.72548
## 6 Voli Changeup 75.99522 1512.991 180.00 -1.02870 22.51789
## 7 Voli Changeup 76.36948 1553.620 187.50 4.89811 16.28143
## 8 Voli Curveball 74.19844 2608.908 135.00 -6.94307 1.49106
## 9 Voli Changeup 81.66738 2261.295 18.75 10.79583 16.57682
## 10 Voli Changeup 77.10877 1654.092 191.25 5.61520 16.56485
## 11 Voli Four-Seam 85.56431 2412.962 18.75 12.74107 18.14592
## 12 Voli Changeup 76.55645 1458.533 18.75 7.15473 12.42205
## 13 Voli Changeup 84.45398 2317.038 26.25 15.20446 12.78887
## 14 Voli Changeup 76.49584 1546.319 15.00 8.73296 16.01981
## 15 Voli Changeup 75.73685 1564.757 191.25 5.63890 14.12851
Voli_UPP <- x %>%
filter(BatterTeam == "UPP_VAL") %>%
select(Pitcher, AutoPitchType, RelSpeed, SpinRate, Tilt, HorzBreak, InducedVertBreak)
Voli_UPP
## Pitcher AutoPitchType RelSpeed SpinRate Tilt HorzBreak InducedVertBreak
## 1 Voli Changeup 80.98021 2300.685 18.75 14.82032 18.49084
## 2 Voli Curveball 72.75822 2301.544 135.00 -8.17461 1.34028
## 3 Voli Curveball 70.99009 2337.525 127.50 -9.18575 -0.37732
## 4 Voli Curveball 71.93938 2517.488 127.50 -6.82981 0.28496
## 5 Voli Changeup 82.79835 2286.609 18.75 11.94922 16.85288
## 6 Voli Changeup 76.80268 1721.693 187.50 3.96378 20.63627
## 7 Voli Changeup 73.76983 1560.400 15.00 8.76654 16.81028
## 8 Voli Curveball 72.06535 2446.350 135.00 -10.20048 1.97043
## 9 Voli Changeup 83.46699 2445.469 18.75 13.99017 18.31407
## 10 Voli Changeup 74.48958 1552.076 15.00 9.52189 18.87757
## 11 Voli Changeup 80.91683 2413.807 26.25 15.45513 13.69765
## 12 Voli Changeup 80.99136 2326.571 191.25 9.86701 23.04895
## 13 Voli Changeup 72.99152 1438.124 183.75 2.47000 16.50387
## 14 Voli Changeup 80.98021 2300.685 18.75 14.82032 18.49084
## 15 Voli Curveball 72.75822 2301.544 135.00 -8.17461 1.34028
## 16 Voli Curveball 70.99009 2337.525 127.50 -9.18575 -0.37732
## 17 Voli Curveball 71.93938 2517.488 127.50 -6.82981 0.28496
## 18 Voli Changeup 82.79835 2286.609 18.75 11.94922 16.85288
## 19 Voli Changeup 76.80268 1721.693 187.50 3.96378 20.63627
## 20 Voli Changeup 73.76983 1560.400 15.00 8.76654 16.81028
## 21 Voli Curveball 72.06535 2446.350 135.00 -10.20048 1.97043
## 22 Voli Changeup 83.46699 2445.469 18.75 13.99017 18.31407
## 23 Voli Changeup 74.48958 1552.076 15.00 9.52189 18.87757
## 24 Voli Changeup 80.91683 2413.807 26.25 15.45513 13.69765
## 25 Voli Changeup 80.99136 2326.571 191.25 9.86701 23.04895
## 26 Voli Changeup 72.99152 1438.124 183.75 2.47000 16.50387
Voli_Dan <- x %>%
filter(BatterTeam == "DAN_WES") %>%
select(Pitcher, AutoPitchType, RelSpeed, SpinRate, Tilt, HorzBreak, InducedVertBreak)
Voli_Dan
## Pitcher AutoPitchType RelSpeed SpinRate Tilt HorzBreak InducedVertBreak
## 1 Voli Changeup 81.52050 2258.385 15.00 12.22406 24.81702
## 2 Voli Curveball 69.90887 2369.841 135.00 -10.66410 1.42410
## 3 Voli Curveball 69.64661 2330.810 138.75 -10.02969 3.37154
## 4 Voli Changeup 81.61435 2380.928 191.25 11.19158 24.44340
## 5 Voli Four-Seam 82.60981 2401.749 15.00 15.87481 25.99994
## 6 Voli Curveball 69.83970 2291.161 135.00 -13.51040 1.67055
## 7 Voli Changeup 80.61170 2180.923 18.75 14.45595 18.47269
## 8 Voli Changeup 82.85626 2306.942 18.75 13.40213 17.88836
## 9 Voli Changeup 74.01941 1441.080 172.50 -7.09351 23.72627
## 10 Voli Changeup 80.61249 2272.415 18.75 13.59182 17.89655
## 11 Voli Changeup 82.93775 2290.632 18.75 14.30517 18.09871
## 12 Voli Curveball 70.71470 2296.173 116.25 -5.99618 -2.37949
## 13 Voli Curveball 70.34952 2331.333 116.25 -9.03575 -5.75803
## 14 Voli Curveball 68.43367 2212.621 127.50 -6.55327 -0.32689
## Warning: Removed 8 rows containing missing values (`geom_point()`).