data <- read.table("./FPKM.txt",sep = '\t',header = T)
p1 <-as.matrix(p_value)?
p2 <-as.vector(p1)#格式轉換
?p2
p_adjust <- p.adjust(p2,method = "BH")
data <- read.table("./FPKM.txt",sep = '\t',header = T)
p1 <-as.matrix(p_value)?
p2 <-as.vector(p1)#格式轉換
?p2
p_adjust <- p.adjust(p2,method = "BH")