1. 将数据框中多个向量并未一列
可以将数据框转化为01矩阵,通过%*%矩阵乘法,将列序号(ncol(数据框))与数据框的01矩阵相乘得到对应的数字
。所得数字可映射为第几列的名字
dd[] <- dd %>% lapply(as.factor) %>% lapply(as.numeric) %>% as.matrix()
dd <- ifelse(is.na(dd),0,1)
data2 <- data1[index,names(data1)[c(49:56,67:74,94:101)]]
data2$Discipline <- factor(dd %*% (1:ncol(dd)),
labels = colnames(dd))
2提出变量
直接选中变量所需变量的列即可
3变量分组和求和
group_by(分组)
summarise_each_(data,funs(sum), names(data3[-ncol(data3)]))
group_by直接加变量名 group_by_需要加双引号
4随机抽样
sample(1:nrow(data), size, replace) size指抽样的数量,replace指是否放回抽样
5数据整合
outcomes <- full[1:26729, ] %>%
group_by(AnimalType, OutcomeType) %>%
summarise(num_animals = n())