> #Note: X and Y values are subtracted from 250 because the way that the field is represented is flipped from our traditional view.
> ggplot(data=edited_atbat_table[edited_atbat_table$bat_mlbid == 656555,], aes(x=250 - hit_x,y= 250 - hit_y))+
+     geom_point()+
+     xlim(0,250)+
+     ylim(0,250)+
+     labs(title='Rhys Hoskins Batted Balls, 2017',subtitle='Source: MiLB Pitch Data')
Warning message:
Removed 145 rows containing missing values (geom_point).