# creation of the tsv file containing the genes, their Expression value and their expression status
gene_file<-sqldf("select C.gene, G.gene_name as gene_symbol, T.gene_biotype as gene_type, C.logFC as log2fc_condition, C.adj_P_Val as adjpval_condition, C.expressed as status_condition,
L.logFC as log2fc_line, L.adj_P_Val as adjpval_line, L.expressed as status_line,
...
...
@@ -56,6 +64,8 @@ gene_file <- sqldf("select C.gene, G.gene_name as gene_symbol, T.gene_biotype as
write.csv(gene_file,"data/gene_info.csv")
# differentially expressed genes in line and in condition:
diff_ex<-sqldf("select C.gene, C.expressed as condition_expressed, L.expressed as line_expressed