create env in ggplot then pass it to stat_summary