Ну, вы можете сделать это в 2 шага, используя
# Transpose table YOU WANT
fooData.T <- t(fooData[,2:ncol(fooData)])
# Set the column headings from the first column in the original table
colnames(fooData.T) <- fooData[,1]
В результате получается матрица, о которой вы, вероятно, знаете, это связано с проблемами класса при переносе.Я не думаю, что будет один способ сделать это, учитывая отсутствие способностей именования на этапе транспонирования.