Update barplot_R_from_table.r

transposed data, removed first col