Update plot_activity.r