"0","ggplot(gathered_impacts, aes(SimpleEOLname, impact, fill = contractor) ) +"
"0","   geom_bar(stat = ""identity"", position = ""stack"") +"
"0","   geom_hline(yintercept = 0,  color = ""grey0"") +"
"0","   scale_fill_manual(values = DEQ_pal) +"
"0","   coord_flip() +"
"0","   facet_grid(scenario ~ impact_units) +"
"0","   ggtitle(""impacts by contractor and basic material type"")"
