enter image description here
df <- read.table("DESEQ2_all_name.txt", header = T, sep = "\\t") df <- t(df) df <- as.data.f