Loads user selected data to be used for DESeq
load_data(input = NULL, session = NULL)
input,
input values
session,
if data is going to be loaded from json
data
x<-load_data ()