facet_grid(~pitch_type)
modify darvish_data
use rgl image
remove shiny apps