『データフレームの行列入れ替え』
びっくりdata <- t(data)これでdataの行列が入れ替わる
ameblo.jp