<div dir="ltr">Veja a <i>vignette</i> do pacote SIBER.</div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Sat, Feb 8, 2020 at 9:58 PM Luiz Leal por (R-br) <<a href="mailto:r-br@listas.c3sl.ufpr.br">r-br@listas.c3sl.ufpr.br</a>> wrote:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div><div style="font-family:"Helvetica Neue",Helvetica,Arial,sans-serif;font-size:13px"><div dir="ltr"><br></div><div dir="ltr">Prezados, como faço para criar um script que identifique que os laboratórios 7042 e 9541 estão fora da elipse.</div><div dir="ltr">Os dados seguem em anexo.</div><div dir="ltr">Desde já agradeço.</div><div dir="ltr">Luiz</div><div dir="ltr"><br></div><div dir="ltr"><div><br># Dados<br>  setwd("F:\\")<br>  library(xlsx)<br>  dados=read.xlsx("Lab.xlsx" , sheetIndex=1,encoding="UTF-8")<br>  elipse=read.xlsx("elipse.xlsx" , sheetIndex=1,encoding="UTF-8")<br>  x=dados$x<br>  y=dados$y<br>  </div><div># Graph<br>  limitex = c( min(c(x,elipse[,1])), max(c(x,elipse[,1])) )<br>  limitey = c( min(c(y,elipse[,2])), max(c(y,elipse[,2])) )<br>  plot(x, y, type = "n", xlab = "", xlim = limitex, ylim = limitey, ylab = "", cex.axis = 1.3, cex.lab = 1.3)<br>  text(x, y, dados$Lab, font = 2, cex = 0.8)<br>  points(elipse, type = "l", col = "red")<br></div></div><b></b><i></i><u></u><strike></strike><div dir="ltr"><br></div><div dir="ltr"><b></b><i></i><u></u><strike></strike><br></div><div dir="ltr"><img title="Inline image" style="width: 100%; max-width: 488px;" alt="Inline image" src="cid:170317744d120199b641"><br><span><br></span><b></b><i></i><u></u><strike></strike><br></div></div></div>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="noreferrer" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" rel="noreferrer" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br>
</blockquote></div>