Enter the body of text here

Code should be placed in three backticks as shown below

ountData3 <- read.csv("gene_count_matrix_nef.csv", header = T, row.names = 1)
colData3 <- read.table("c_e_nef.txt", header = T, sep="\t")
xpr_matrix_nef <- as.matrix(countData3)
eset_nef <- ExpressionSet(assayData = expr_matrix_nef, phenoData = AnnotatedDataFrame(colData3))