Commit 5f54a693 authored by Schoorlemmer, Joran's avatar Schoorlemmer, Joran
Browse files

Update Diff_analysis.R

parent b9d4b867
......@@ -10,7 +10,7 @@ library(DESeq2)
# Functions
run_analysis <- function(file_name) {
data <- read.table(file_name, row.names = 1, header=TRUE)
condition = factor(c("reference","reference", "sample", "sample"),c("reference","sample"))
condition = factor(c("reference","reference","reference","reference","reference","sample","sample","sample","sample","sample"),c("reference","sample"))
col_data = data.frame(condition)
# init dds
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment