R - 从3个原始向量创建矩阵

Question

我有3个向量如下:

A <- c("A", "B", "C", "D", "E")
B <- c("1/1/1", "1/1/1", "2/1/1", "2/1/1", "3/1/1")
C <- c(1, 1, -1, 1, -1)

我想使用这3个向量创建如下的矩阵:

- 1/1/1 2/1/1 3/1/1
A   1    0     0
B   1    0     0
C   0    -1    0
D   0    1     0
E   0    0     -1

其中矢量A和B分别是行和列和我有数据C.任何帮助,将不胜感激.

Answer 1

使用 ?xtabs

xtabs(C ~ A+B)
#   B
#A   1/1/1 2/1/1 3/1/1
#  A     1     0     0
#  B     1     0     0
#  C     0    -1     0
#  D     0     1     0
#  E     0     0    -1

Answer 2

你可以试试:

`[<-`(array(0,c(length(unique(A)),length(unique(B))),
      list(unique(A),unique(B))),
       cbind(A,B),C)
#  1/1/1 2/1/1 3/1/1
#A     1     0     0
#B     1     0     0
#C     0    -1     0
#D     0     1     0
#E     0     0    -1