"0","ggplot(gathered_impacts, aes(project, impact, fill = SimpleEOLname) ) +"
"0","   geom_bar(stat = ""identity"", position = ""fill"") +"
"0","   geom_hline(yintercept = 0,  color = ""grey0"") +"
"0","   scale_fill_manual(values = DEQ_pal[5:9]) +"
"0","   theme(axis.text.x = element_blank()) +"
"0","   facet_grid(scenario ~ impact_units) +"
"0","   ggtitle(""impacts by project and basic material type"")"
