rerun dataset

covid_comp_dataset.Rnw

@@ -227,13 +227,13 @@ for (p in 0:5){
 
 tmp<-tablo$`tmp$Gene.name`[tablo$nbats==0 & tablo$nprimates==1]
 text(-0.4,-1.2, "p=1/n=0", cex=0.6)
-text(seq(from=0.1, to=5.5, length.out = 18),
+text(seq(from=0.1, to=5.5, length.out = 19),
      -1.1, 
-     tmp[1:18], 
+     tmp[1:19], 
      cex=0.4)
-text(seq(from=0.1, to=5.5, length.out = length(tmp)-18),
+text(seq(from=0.1, to=5.5, length.out = length(tmp)-19),
      -1.3, 
-     tmp[19:length(tmp)],
+     tmp[20:length(tmp)],
      cex=0.4)
 
 tmp<-tablo$`tmp$Gene.name`[tablo$nbats==1 & tablo$nprimates==1]

covid_comp_dataset.tex

@@ -766,13 +766,13 @@ Analysis were formatted by the script covid\_comp\_script0\_table.Rnw.
 \begin{alltt}
 \hlstd{tmp}\hlkwb{<-}\hlstd{tablo}\hlopt{$}\hlstd{`tmp$Gene.name`[tablo}\hlopt{$}\hlstd{nbats}\hlopt{==}\hlnum{0} \hlopt{&} \hlstd{tablo}\hlopt{$}\hlstd{nprimates}\hlopt{==}\hlnum{1}\hlstd{]}
 \hlkwd{text}\hlstd{(}\hlopt{-}\hlnum{0.4}\hlstd{,}\hlopt{-}\hlnum{1.2}\hlstd{,} \hlstr{"p=1/n=0"}\hlstd{,} \hlkwc{cex}\hlstd{=}\hlnum{0.6}\hlstd{)}
-\hlkwd{text}\hlstd{(}\hlkwd{seq}\hlstd{(}\hlkwc{from}\hlstd{=}\hlnum{0.1}\hlstd{,} \hlkwc{to}\hlstd{=}\hlnum{5.5}\hlstd{,} \hlkwc{length.out} \hlstd{=} \hlnum{18}\hlstd{),}
+\hlkwd{text}\hlstd{(}\hlkwd{seq}\hlstd{(}\hlkwc{from}\hlstd{=}\hlnum{0.1}\hlstd{,} \hlkwc{to}\hlstd{=}\hlnum{5.5}\hlstd{,} \hlkwc{length.out} \hlstd{=} \hlnum{19}\hlstd{),}
      \hlopt{-}\hlnum{1.1}\hlstd{,}
-     \hlstd{tmp[}\hlnum{1}\hlopt{:}\hlnum{18}\hlstd{],}
+     \hlstd{tmp[}\hlnum{1}\hlopt{:}\hlnum{19}\hlstd{],}
      \hlkwc{cex}\hlstd{=}\hlnum{0.4}\hlstd{)}
-\hlkwd{text}\hlstd{(}\hlkwd{seq}\hlstd{(}\hlkwc{from}\hlstd{=}\hlnum{0.1}\hlstd{,} \hlkwc{to}\hlstd{=}\hlnum{5.5}\hlstd{,} \hlkwc{length.out} \hlstd{=} \hlkwd{length}\hlstd{(tmp)}\hlopt{-}\hlnum{18}\hlstd{),}
+\hlkwd{text}\hlstd{(}\hlkwd{seq}\hlstd{(}\hlkwc{from}\hlstd{=}\hlnum{0.1}\hlstd{,} \hlkwc{to}\hlstd{=}\hlnum{5.5}\hlstd{,} \hlkwc{length.out} \hlstd{=} \hlkwd{length}\hlstd{(tmp)}\hlopt{-}\hlnum{19}\hlstd{),}
      \hlopt{-}\hlnum{1.3}\hlstd{,}
-     \hlstd{tmp[}\hlnum{19}\hlopt{:}\hlkwd{length}\hlstd{(tmp)],}
+     \hlstd{tmp[}\hlnum{20}\hlopt{:}\hlkwd{length}\hlstd{(tmp)],}
      \hlkwc{cex}\hlstd{=}\hlnum{0.4}\hlstd{)}
 
 \hlstd{tmp}\hlkwb{<-}\hlstd{tablo}\hlopt{$}\hlstd{`tmp$Gene.name`[tablo}\hlopt{$}\hlstd{nbats}\hlopt{==}\hlnum{1} \hlopt{&} \hlstd{tablo}\hlopt{$}\hlstd{nprimates}\hlopt{==}\hlnum{1}\hlstd{]}