Added shiny features to plot function in TSCollection