web-dev-qa-db-ja.com

data.frame列をRの行に変更します

A <- c(1,6)
B <- c(2,7)
C <- c(3,8)
D <- c(4,9)
E <- c(5,0)
df <- data.frame(A,B,C,D,E)
df
  A B C D E
1 1 2 3 4 5
2 6 7 8 9 0

これが欲しいです:

df
   1  2
A  1  6 
B  2  7
C  3  8
D  4  9    
E  5  0
21
Travis

データフレームが本当にその形式である場合、ベクトルはすべて文字ベクトルになります。または、基本的に文字マトリックスがあり、これを行うことができます:

data.frame(t(df))

ただし、最初からやりたいように定義する方が良いでしょう

df <- data.frame(c('A','B','C','D','E'), 
                 c(1, 2, 3, 4, 5),
                 c(6, 7, 8, 9, 0))

これもできます

df <- data.frame(LETTERS[1:5], 1:5, c(6:9, 0))

列に名前を付けたい場合は、これを行うことができます

df <- data.frame(L = LETTERS[1:5], N1 = 1:5, N2 = c(6:9, 0))

Excelデータのread.DIFを使用すると、データが転置されることがあります。それは元のデータをどのように取得したのですか?もしそうなら、あなたは呼び出すことができます

read.DIF(filename, transpose = T)

データを正しい方向に取得します。

24
adamleerich

私は本当にお勧めしますdata.tableエラーが発生しやすいため、手動ステップなしのアプローチ

A <- c(1,6)
B <- c(2,7)
C <- c(3,8)
D <- c(4,9)
E <- c(5,0)
df <- data.frame(A,B,C,D,E)
df

library('data.table')
dat.m <- melt(as.data.table(df, keep.rownames = "Vars"), id.vars = "Vars") # https://stackoverflow.com/a/44128640/54964

dat.m

出力

  A B C D E
1 1 2 3 4 5
2 6 7 8 9 0
    Vars variable value
 1:    1        A     1
 2:    2        A     6
 3:    1        B     2
 4:    2        B     7
 5:    1        C     3
 6:    2        C     8
 7:    1        D     4
 8:    2        D     9
 9:    1        E     5
10:    2        E     0

R:3.4.0(バックポート)
OS:Debian 8.7