Day 3 R语言代码

#行名，列名，两者合一，加列/行名
dim()
colnames()
rownames()
#加列名即为对向量进行赋值；修改单个列名，取子集即可
m <- matrix(1:12,nrow = 3);m
colnames(m) <- c("a","b","c","d") 
colnames(m)[1] <- "hello";m
#融合函数
merge(test1,test3,by.x = "name",by.y = "NAME")

#对于matrix的转置函数
t()

#热图的两种函数，一种对数据的类型有要求，一种无。
#as函数可以修改数据的类型
a <- iris[1:4]
a <- as.matrix(a)
heatmap(a)
pheatmap::pheatmap()

#按照逻辑值取子集，可以保留了逻辑值为T的行
df1 <- data.frame(gene   = paste0("gene",1:4),
                  change  = rep(c("up","down"),each = 2),
                  score   = c(5,3,-2,-4))
k <- df1$score>0;k
df1[k,]

#写函数的函数
hai <- function(a,b,m=2){(a)^m-1}
hai(5,2)