根据要素在R中创建一个零点矩阵

Question

我有一个像这样的数据集：

library(dplyr)
library(purrr)
map(lst1, ~ .x %>%
               slice(1:4)) %>%
         reduce(full_join, by = 'hitID')

如何在R中以名称为行，Pet为列，isTrain为值的R中将其制成矩阵？

Answer 1

我们可以使用xtabs中的base R

xtabs(isTrain ~ Name + Pet, df1)
# Pet
#Name  Cat Dog Rabbit
#  Ben   0   1      0
#  Kim   0   0      0

数据

df1 <- data.frame(Name = c('Ben', 'Kim', 'Kim'),
     Pet = c('Dog', 'Cat', 'Rabbit'), isTrain = c(1, 0, 0))