added two plots and modified species trajectory ggplots