This generates a test data that is suitable to main plots in debrowser
generateTestData(dat = NULL)
dat,
DESeq results will be generated for loaded data
testData
x <- generateTestData()