#645277 is Smith's MiLB Player ID, a unique identifier.
ggplot(edited_pitch_table[edited_pitch_table$bat_id ==645277 & edited_pitch_table$retro_game_id == 'LVG201704270',], aes(x, y))+
    geom_point(aes(color=pitch_res))+
    xlim(0,250)+
    ylim(0,250)+
    labs(title='Dominic Smith Pitches, April 27, 2017', subtitle='Source: MiLB Pitch Data')