Commit 6455da81 authored by mcariou's avatar mcariou
Browse files

update dataset

parent 50ae18da
......@@ -74,8 +74,9 @@ plot(x,y, xlab="bpp omega primate", ylab="bpp omega bats", cex=0.5)
abline(0,1)
abline(lm(y~x), col="red")
text(x[x>0.5 &y<0.4], (y[x>0.5 &y<0.4]+0.01), names(x)[x>0.5 &y<0.4])
text(x[x<0.45 &y>0.45], (y[x<0.45 &y>0.45]+0.01), names(x)[x<0.45 &y>0.45])
text(x[x>0.5 &y<0.4], (y[x>0.5 &y<0.4]+0.01), names(x)[x>0.5 &y<0.4], cex=0.7)
text(x[x<0.45 &y>0.45], (y[x<0.45 &y>0.45]+0.01), names(x)[x<0.45 &y>0.45], cex=0.7)
text(x[x>0.45 &y>0.4], (y[x>0.45 &y>0.4]+0.01), names(x)[x>0.45 &y>0.4], cex=0.7)
@
......
No preview for this file type
......@@ -152,8 +152,9 @@ Analysis were formatted by the script covid\_comp\_script0\_table.Rnw.
\hlkwd{abline}\hlstd{(}\hlnum{0}\hlstd{,}\hlnum{1}\hlstd{)}
\hlkwd{abline}\hlstd{(}\hlkwd{lm}\hlstd{(y}\hlopt{~}\hlstd{x),} \hlkwc{col}\hlstd{=}\hlstr{"red"}\hlstd{)}
\hlkwd{text}\hlstd{(x[x}\hlopt{>}\hlnum{0.5} \hlopt{&}\hlstd{y}\hlopt{<}\hlnum{0.4}\hlstd{], (y[x}\hlopt{>}\hlnum{0.5} \hlopt{&}\hlstd{y}\hlopt{<}\hlnum{0.4}\hlstd{]}\hlopt{+}\hlnum{0.01}\hlstd{),} \hlkwd{names}\hlstd{(x)[x}\hlopt{>}\hlnum{0.5} \hlopt{&}\hlstd{y}\hlopt{<}\hlnum{0.4}\hlstd{])}
\hlkwd{text}\hlstd{(x[x}\hlopt{<}\hlnum{0.45} \hlopt{&}\hlstd{y}\hlopt{>}\hlnum{0.45}\hlstd{], (y[x}\hlopt{<}\hlnum{0.45} \hlopt{&}\hlstd{y}\hlopt{>}\hlnum{0.45}\hlstd{]}\hlopt{+}\hlnum{0.01}\hlstd{),} \hlkwd{names}\hlstd{(x)[x}\hlopt{<}\hlnum{0.45} \hlopt{&}\hlstd{y}\hlopt{>}\hlnum{0.45}\hlstd{])}
\hlkwd{text}\hlstd{(x[x}\hlopt{>}\hlnum{0.5} \hlopt{&}\hlstd{y}\hlopt{<}\hlnum{0.4}\hlstd{], (y[x}\hlopt{>}\hlnum{0.5} \hlopt{&}\hlstd{y}\hlopt{<}\hlnum{0.4}\hlstd{]}\hlopt{+}\hlnum{0.01}\hlstd{),} \hlkwd{names}\hlstd{(x)[x}\hlopt{>}\hlnum{0.5} \hlopt{&}\hlstd{y}\hlopt{<}\hlnum{0.4}\hlstd{],} \hlkwc{cex}\hlstd{=}\hlnum{0.7}\hlstd{)}
\hlkwd{text}\hlstd{(x[x}\hlopt{<}\hlnum{0.45} \hlopt{&}\hlstd{y}\hlopt{>}\hlnum{0.45}\hlstd{], (y[x}\hlopt{<}\hlnum{0.45} \hlopt{&}\hlstd{y}\hlopt{>}\hlnum{0.45}\hlstd{]}\hlopt{+}\hlnum{0.01}\hlstd{),} \hlkwd{names}\hlstd{(x)[x}\hlopt{<}\hlnum{0.45} \hlopt{&}\hlstd{y}\hlopt{>}\hlnum{0.45}\hlstd{],} \hlkwc{cex}\hlstd{=}\hlnum{0.7}\hlstd{)}
\hlkwd{text}\hlstd{(x[x}\hlopt{>}\hlnum{0.45} \hlopt{&}\hlstd{y}\hlopt{>}\hlnum{0.4}\hlstd{], (y[x}\hlopt{>}\hlnum{0.45} \hlopt{&}\hlstd{y}\hlopt{>}\hlnum{0.4}\hlstd{]}\hlopt{+}\hlnum{0.01}\hlstd{),} \hlkwd{names}\hlstd{(x)[x}\hlopt{>}\hlnum{0.45} \hlopt{&}\hlstd{y}\hlopt{>}\hlnum{0.4}\hlstd{],} \hlkwc{cex}\hlstd{=}\hlnum{0.7}\hlstd{)}
\end{alltt}
\end{kframe}
\includegraphics[width=\maxwidth]{figure/unnamed-chunk-3-1}
......
No preview for this file type
No preview for this file type
No preview for this file type
No preview for this file type
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment