Add new file

Command_Lines_R

+#Command Lines used to plot the bimodal distribution:
+    #The chosen input file contained the GC and GC3 values against their percentage in the CDS
+>GC3 <- read.table(choose.files(), h=T)
+>ggplot(GC3, aes(GC3, CDS))
++geom_point()
++geom_lline(color=”red”)
++ggtitle(“B”)
+
+#Command Lines used for randomization:
+    #The chosen input file contained all the loci of the CDS and their GC3 values
+>my.data <- as.numeric(as.vector(read.table(choose.files())[,1]))
+>replicate(1000, mean(sample(my.data, 590)))
+
+#Command Lines used to plot normal distribution + observed mean:
+    #The chosen input files were 1) ND: data of randomization and 2) NDobs: data containing observed mean
+>ND <- read.table(choose.files(), h=T)
+>NDobs <- read.table(choose.files(), h=T)
+>ggplot(ND,aes(GC3,Appearance))
++geom_point()
++geom_smooth(color="red",size=3)
++stat_function(fun=dnorm,color="grey")
++geom_point(data=NDobs,shape=21,color="black",fill="yellow",size=3,stroke=3)