Basic Pitch Stats

Pitcher

Pitch

N

Balls

Strikes

Strike_Percentage

Ball_Percentage

Carpenter

Changeup

70

28

42

60.00%

40.00%

Carpenter

Curveball

16

11

5

31.25%

68.75%

Carpenter

Four-Seam

2

0

2

100.00%

0.00%

Carpenter

Sinker

2

1

1

50.00%

50.00%

Carpenter

Slider

4

1

3

75.00%

25.00%

Carpenter

Splitter

5

3

2

40.00%

60.00%

Pitcher

Pitch

N

Balls

Strikes

Velo

Spin Rate

Vert Break

Horizontal Break

Tilt

Strike_Percentage

Ball_Percentage

Carpenter

Changeup

70

28

42

81.59983

2,091.561

11.0377529

-17.466013

146.83929

60.00%

40.00%

Carpenter

Curveball

16

11

5

74.30236

2,629.748

-0.8466987

6.451738

53.67188

31.25%

68.75%

Carpenter

Four-Seam

2

0

2

85.27193

2,301.558

15.6054800

-12.084105

159.37500

100.00%

0.00%

Carpenter

Sinker

2

1

1

84.61071

2,225.222

11.9007000

-11.578885

157.50000

50.00%

50.00%

Carpenter

Slider

4

1

3

75.07688

2,322.028

3.6993625

6.242000

34.68750

75.00%

25.00%

Carpenter

Splitter

5

3

2

84.52006

2,254.832

19.7519740

-18.308544

157.50000

40.00%

60.00%

Carp_OState <- x %>%
   filter(BatterTeam == "OCE_STA6") %>%
  select(Pitcher, AutoPitchType, RelSpeed, SpinRate, Tilt, HorzBreak, InducedVertBreak)
Carp_OState
##      Pitcher AutoPitchType RelSpeed SpinRate   Tilt HorzBreak InducedVertBreak
## 1  Carpenter        Sinker 84.57739 2238.615 161.25  -9.20863         12.03446
## 2  Carpenter      Changeup 76.90999 1436.988 142.50 -14.08442          6.06890
## 3  Carpenter        Slider 76.06410 1526.657  37.50   1.06035          1.80146
## 4  Carpenter      Changeup 85.28277 2178.089 150.00 -15.07194          8.72571
## 5  Carpenter      Changeup 77.17160 1478.986 131.25 -13.10335         -0.37327
## 6  Carpenter      Changeup 74.86073 1534.759 142.50 -14.90658          6.61642
## 7  Carpenter      Changeup 77.26427 1464.091 150.00  -9.15528          6.54465
## 8  Carpenter     Four-Seam 85.02281 2276.125 157.50 -12.60568         14.95170
## 9  Carpenter     Four-Seam 85.52104 2326.991 161.25 -11.56253         16.25926
## 10 Carpenter        Sinker 84.64403 2211.830 153.75 -13.94914         11.76694
## 11 Carpenter     Curveball 74.27600 2719.787  60.00  11.62501         -4.32233
Carp_UValley <- x %>%
   filter(BatterTeam == "UPP_VAL") %>%
  select(Pitcher, AutoPitchType, RelSpeed, SpinRate, Tilt, HorzBreak, InducedVertBreak)
Carp_UValley
##      Pitcher AutoPitchType RelSpeed SpinRate   Tilt HorzBreak InducedVertBreak
## 1  Carpenter      Changeup 82.57613 2107.566 161.25 -12.25032         18.85044
## 2  Carpenter      Changeup 84.91721 2225.053 157.50 -18.05383         17.73485
## 3  Carpenter      Splitter 84.56658 2197.227 157.50 -16.56851         19.49521
## 4  Carpenter      Changeup 84.18590 2164.866 153.75 -18.58375         17.15158
## 5  Carpenter      Splitter 85.28583 2278.884 157.50 -16.33150         19.68974
## 6  Carpenter     Curveball 74.05654 2482.663  18.75   4.34347          7.81268
## 7  Carpenter      Splitter 83.89859 2238.526 157.50 -17.76249         19.64332
## 8  Carpenter      Changeup 83.92993 2045.407 153.75 -17.96328         15.36048
## 9  Carpenter      Splitter 84.84373 2312.708 157.50 -20.43733         20.22879
## 10 Carpenter      Changeup 84.21922 2217.101 153.75 -20.09828         15.69757
## 11 Carpenter      Changeup 83.64016 2091.842 150.00 -20.25422         11.99662
## 12 Carpenter      Changeup 77.64913 1498.200 150.00 -20.30407         12.04489
## 13 Carpenter      Changeup 83.97290 2112.821 150.00 -20.81387         14.16217
## 14 Carpenter        Slider 74.42370 2484.542  26.25   4.95299          5.44331
## 15 Carpenter      Changeup 83.89956 2195.397 153.75 -21.62202         15.97607
## 16 Carpenter        Slider 74.96005 2677.258  41.25  10.84666          2.91425
## 17 Carpenter      Changeup 83.91021 2212.777 146.25 -20.96056         10.30071
## 18 Carpenter     Curveball 76.20923 2680.729  52.50   8.28957         -0.55795
## 19 Carpenter      Changeup 76.06871 1546.884 150.00 -15.88843         11.11575
## 20 Carpenter      Changeup 85.60770 2333.275 150.00 -20.86233         12.37658
## 21 Carpenter     Curveball 74.10801 2582.891  48.75  11.03721          0.23744
## 22 Carpenter      Changeup 83.48002 2186.202 150.00 -18.02840         13.09457
## 23 Carpenter        Slider 74.85967 2599.654  33.75   8.10800          4.63843
## 24 Carpenter     Curveball 75.43482 2697.805  37.50   8.19819          4.58532
## 25 Carpenter      Changeup 83.54738 2190.810 153.75 -12.74981         12.58969
## 26 Carpenter      Changeup 83.87516 2260.880 157.50 -12.13162         13.50898
## 27 Carpenter      Changeup 82.83320 2191.986 153.75 -14.32623         12.30721
## 28 Carpenter      Changeup 82.71841 2291.635 157.50 -14.69308         15.42438
## 29 Carpenter      Changeup 84.49994 2296.954 153.75 -15.75674         14.69233
Carp_Newport <- x %>%
   filter(BatterTeam == "NEW_GUL") %>%
  select(Pitcher, AutoPitchType, RelSpeed, SpinRate, Tilt, HorzBreak, InducedVertBreak)
Carp_Newport
##     Pitcher AutoPitchType RelSpeed SpinRate   Tilt HorzBreak InducedVertBreak
## 1 Carpenter     Curveball 74.84774 2572.196  22.50   2.57421          4.27862
## 2 Carpenter      Changeup 84.47528 2186.684 157.50 -16.17213         15.95938
## 3 Carpenter      Changeup 84.61172 2199.222 153.75 -16.27343         14.61119
Carp_Bristol1 <- x %>%
   filter(BatterTeam == "BRI_B", Date == "2023-06-28") %>%
  select(Pitcher, AutoPitchType, RelSpeed, SpinRate, Tilt, HorzBreak, InducedVertBreak)
Carp_Bristol1
##      Pitcher AutoPitchType RelSpeed SpinRate   Tilt HorzBreak InducedVertBreak
## 1  Carpenter      Changeup 84.53593 2299.360 153.75 -18.05627         14.75950
## 2  Carpenter     Curveball 76.45741 2626.043  37.50   2.94799          2.03146
## 3  Carpenter      Changeup 83.36168 2265.450 150.00 -19.65288         14.06859
## 4  Carpenter      Changeup 84.31147 2318.937 153.75 -17.40025         13.74430
## 5  Carpenter      Changeup 84.05417 2369.173 153.75 -17.54198         15.09595
## 6  Carpenter      Changeup 85.09343 2335.735 150.00 -18.41907         13.19973
## 7  Carpenter      Changeup 84.33474 2290.058 150.00 -17.74985         12.62174
## 8  Carpenter      Changeup 83.94066 2309.226 150.00 -18.90379         13.29300
## 9  Carpenter      Changeup 84.00600 2273.498 146.25 -21.40446          9.04835
## 10 Carpenter      Changeup 74.59199 1544.291 146.25 -17.76910          8.44898
Carp_Sanford <- x %>%
   filter(BatterTeam == "SAN_MAI") %>%
  select(Pitcher, AutoPitchType, RelSpeed, SpinRate, Tilt, HorzBreak, InducedVertBreak)
Carp_Sanford
##      Pitcher AutoPitchType RelSpeed SpinRate   Tilt HorzBreak InducedVertBreak
## 1  Carpenter      Changeup 81.80265 2235.177 150.00 -21.11170         13.14497
## 2  Carpenter      Changeup 81.80611 2235.781 146.25 -20.08875         11.34327
## 3  Carpenter     Curveball 74.23608 2527.387  63.75   4.62843         -2.32165
## 4  Carpenter      Changeup 80.94683 2192.994 157.50 -16.02284         17.44954
## 5  Carpenter      Changeup 82.05009 2204.035 146.25 -18.49304          9.80772
## 6  Carpenter      Changeup 83.04850 2243.217 150.00 -18.65942         11.92607
## 7  Carpenter      Changeup 81.39055 2103.900 146.25  -9.87272          4.91910
## 8  Carpenter      Changeup 81.18698 2160.425 127.50 -18.55036         -2.85106
## 9  Carpenter      Changeup 81.28563 2129.657 146.25 -11.67914          7.00402
## 10 Carpenter      Changeup 73.03912 1655.009 138.75 -20.43800          5.26225
## 11 Carpenter     Curveball 72.80210 2527.764  71.25   0.35327          1.37886
## 12 Carpenter      Changeup 81.73018 2228.455 157.50 -11.80194         12.31745
## 13 Carpenter      Changeup 73.85016 1605.617 138.75 -20.38745          3.40020
## 14 Carpenter      Changeup 81.76762 2212.476 153.75 -15.92363         14.45316
## 15 Carpenter      Splitter 84.00555 2246.814 157.50 -20.44289         19.70281
## 16 Carpenter      Changeup 80.58258 2207.929 146.25 -22.89564          9.36493
## 17 Carpenter     Curveball 74.83541 2636.615  56.25   8.01969         -0.89524
## 18 Carpenter      Changeup 74.25597 1549.088 142.50 -16.13922          5.93012
## 19 Carpenter      Changeup 82.83352 2212.084 150.00 -16.29989         12.17237
## 20 Carpenter     Curveball 74.77908 2568.869  48.75   7.23949          0.44543
## 21 Carpenter      Changeup 82.83421 2303.741 127.50 -43.01746        -10.00111
## 22 Carpenter      Changeup 74.25551 1613.617  15.00  11.16764         23.98824
## 23 Carpenter      Changeup 74.27886 1592.133 135.00 -22.61832          1.36284
## 24 Carpenter      Changeup 83.52496 2272.243 153.75 -16.79249         14.49119
## 25 Carpenter      Changeup 72.66500 1565.837 131.25 -17.04446         -0.76433
## 26 Carpenter      Changeup 83.70534 2236.720 146.25 -21.09584         10.61229
## 27 Carpenter      Changeup 82.28207 2191.870 146.25 -19.06084          9.34052
Carp_North_Adams <- x %>%
   filter(BatterTeam == "NOR_ADA") %>%
  select(Pitcher, AutoPitchType, RelSpeed, SpinRate, Tilt, HorzBreak, InducedVertBreak)
Carp_North_Adams
##      Pitcher AutoPitchType RelSpeed SpinRate   Tilt HorzBreak InducedVertBreak
## 1  Carpenter      Changeup 83.77812 2317.922 153.75 -17.14418         13.56843
## 2  Carpenter      Changeup 81.36665 2226.612 146.25 -19.17824         10.91111
## 3  Carpenter      Changeup 83.39871 2290.564 150.00 -18.39899         12.77426
## 4  Carpenter      Changeup 83.19288 2257.428 150.00 -20.09867         13.19481
## 5  Carpenter     Curveball 74.37630 2695.005  63.75   6.61741         -3.45185
## 6  Carpenter      Changeup 84.46079 2380.338 150.00 -19.07068         13.11926
## 7  Carpenter      Changeup 82.85742 2297.748 146.25 -21.44667         11.88926
## 8  Carpenter      Changeup 83.96731 2290.288 150.00 -16.36099         11.36497
## 9  Carpenter      Changeup 83.38039 2225.139 153.75 -16.08698         13.77772
## 10 Carpenter      Changeup 79.58631 2149.670 150.00 -18.35064         11.95957
## 11 Carpenter      Changeup 82.64089 2164.265 150.00 -18.08316         11.26749
## 12 Carpenter      Changeup 74.40454 1446.364 138.75 -18.75737          3.63803
## 13 Carpenter      Changeup 82.25252 2217.687 153.75 -15.49190         14.58702
## 14 Carpenter     Curveball 71.73602 2591.334  60.00  10.18323         -4.17461
## 15 Carpenter     Curveball 72.31273 2718.442  78.75   3.06634         -5.84465
## 16 Carpenter     Curveball 75.00005 2802.198  63.75   9.25083         -5.01272
## 17 Carpenter      Changeup 83.41765 2283.533 146.25 -19.60899          9.38418
## 18 Carpenter     Curveball 73.37029 2646.247  75.00   4.85347         -7.73599
## 19 Carpenter      Changeup 83.82400 2255.527 150.00 -16.71233          9.71485
## Warning: Removed 11 rows containing missing values (`geom_point()`).