Skip to content
Snippets Groups Projects
Commit 89cc7b70 authored by George Kritikos's avatar George Kritikos
Browse files

finalized analysis, saved hit tables

parent 77ac1f77
No related branches found
No related tags found
No related merge requests found
......@@ -103,6 +103,6 @@ ggplot(transbac.18h[size>0], aes(x=avg..dye.intensity.in.colony, y=size))+
geom_text_repel(data=transbac.18h[size>10000][replicate.number=="A"], aes(label=gene), size=1.6, segment.size=0.2)+
theme_bw()+
scale_x_continuous("avg. dye intensity in colony")+
ggtitle("transbac dye intensity vs size", "showing gene names only for replicate A")
ggsave("transbac dye intensity vs size.pdf", width=450/72, height = 300/72)
ggtitle("Transbac dye intensity vs size", "showing gene names only for replicate A")
ggsave("Transbac dye intensity vs size.pdf", width=450/72, height = 300/72)
......@@ -57,7 +57,7 @@ mob.gene.names.replicates.over.10000.size[gene=="bglB", product:="6-phospho-β-g
#write tables ####
'################################################'
fwrite(mob.gene.names.replicates.over.10000.size, "mob.size.hits.csv")
fwrite(transbac.gene.names.replicates.over.10000.size[order(replicates.hits, decreasing = T)], "transbac.size.hits.csv")
fwrite(mob.gene.names.replicates.over.10000.size[order(replicates.hits, decreasing = T)], "mob.size.hits.csv")
No preview for this file type
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment