changed rearranging of count.matrix columns; cleant plot.R