- 查看目录下文件
list.files("/home/0822")
- p值标星
unicox$star=ifelse(unicox$p<0.001,"***",ifelse(unicox$p >= 0.001 & unicox$p <0.01, "**",
ifelse(unicox$p >=0.01 & unicox$p <0.05, "*",NA)));unicox
- 批量替换表格中的NA
X[is.na(X)]=c("0")
- 看数据的变率
var(as.numeric (dat))
#结果为0,则表明数字都一样
- 跳过
if next
- 切割数据
split(data,data$type)
7.增加一列
mutate(data.frame, new_variable_name=computed_value)
#或者
data$new_colname=new_variable
8.选择
#选择某一列
#1
data$colname
#2
library(dplyr)
starwars %>% select(height)
select(data,colname)
9.多个向量取交集
data <- Reduce(intersect, list(A, B, C, D ...))