Thank you, if you helped me a lot, now I have another question, can you help me? , this code you know if it can be executed instead of txt. in csv.
options(max.print=999999)
rm(list = ls())
x <- read.delim("ReadCounts.txt", row.names = "Symbol", sep = " ")
group <- factor(c(1,1,2,2))
y <- DGEList(counts=x,group=group)
y <- calcNormFactors(y)
y <- estimateCommonDisp(y)
y <- estimateTagwiseDisp(y)
et <- exactTest(y)
ad <- topTags(et, n=19617)
write.table(ad, "output.txt", sep = )