After running the following code, I am getting the error. What Should I do to solve this problem? thanks

Code should be placed in three backticks as shown below

``` counts <- read.delim('counts.csv', header=TRUE, row.names = 1, sep = ",")
counts <- counts[which(rowSums(counts) >50),]
condition <- factor(c("Ctrl1","Ctrl2","Ctrl3", "AD1","AD2","AD3"))

colData <- data.frame(row.names=colnames(counts), condition)

dds <- DESeqDataSetFromMatrix(countData = rounded_counts, colData = colData, design = ~condition)

dds <- DESeq(dds)

# include your problematic code here with any corresponding output

# please also include the results of running the following in an R session

sessionInfo( )

``` estimating size factors estimating dispersions Error in checkForExperimentalReplicates(object, modelMatrix) :

The design matrix has the same number of samples and coefficients to fit, so estimation of dispersion is not possible. Treating samples as replicates was deprecated in v1.20 and no longer supported since v1.22.