第三部改成这样:
data$sig[(data$padj > 0.05|data$padj=="NA")|(data$logFC < 2)& data$logFC > -2] <- "no"
data$sig[data$padj <= 0.05 & data$logFC >= 2] <- "up"
data$sig[data$padj <= 0.05 & data$logFC <= -2] <- "down"
data$sig[data$padj <= 0.05 & data$logFC >= 2] <- "up"
data$sig[data$padj <= 0.05 & data$logFC <= -2] <- "down"