<div dir="ltr">Você leu a nota de rodapé?<div><br></div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">On Wed, Aug 5, 2020 at 8:59 PM Mauro Sznelwar 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><span style="font-size:medium;color:rgb(0,0,255)">Não consegui rodar esta rotina:</span></div>
<div><span style="font-size:12.8px">> res<-NULL</span></div>
<div><span style="font-size:12.8px">> vetor<-c(19,23,27,29)</span></div>
<div><span style="font-size:12.8px">> l <- length(vetor)</span></div>
<div><span style="font-size:12.8px">> for (i in 1:l) {ifelse(length(vetor)>1,res<-c(res,abs(car(vetor)-cdr(vetor))),print(res)); vetor <- cdr(vetor)}</span></div>
<div><span style="font-size:12.8px">Error in car(vetor) : não foi possível encontrar a função "car"</span></div>
<div> </div>
<div> </div>
<div> </div>
<div dir="ltr">OK Jerônimo...
<div> </div>
<div>Para mostrar como o ditado dos erristas é apropriado veja esta solução¹:</div>
<div> </div>
<div><span style="font-family:monospace">> res<-NULL</span></div>
<div>> <span style="font-family:monospace">vetor<-c(19,23,27,29)</span></div>
<div>> <span style="font-family:monospace">l <- length(vetor)<br>> for (i in 1:l) {ifelse(length(vetor)>1,res<-c(res,abs(car(vetor)-cdr(vetor))),print(res)); vetor <- cdr(vetor)}<br>[1] 4 8 10 4 6 2</span></div>
<div> </div>
<div>Numa implementação minha, só para ter o resultado, as três primeiras linhas seriam uma única c/comandos separados por ';' e eu não usaria o <span style="font-family:monospace">ifelse</span> aceitando uma mensagem de erro quando o vetor tivesse esvaziado até um único elemento.</div>
<div>Ademais, eu <em>aceito</em> que o vetor seja destruído na operação, caso vc precise dele, teria que usar uma cópia (também nada de outro mundo).</div>
<div> </div>
<div>HTH</div>
<div>--</div>
<div>Cesar Rabak</div>
<div>[1] precisa da biblioteca <span style="font-family:monospace">lisp</span></div>
</div>
<div> </div>
<div class="gmail_quote">
<div class="gmail_attr" dir="ltr">On Wed, Aug 5, 2020 at 3:23 PM Diogo Jerônimo <<a href="http://../../../undefined//compose?to=diogojose21@yahoo.com.br" target="_blank">diogojose21@yahoo.com.br</a>> wrote:</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:"bookman old style","new york",times,serif;font-size:16px">
<div>
<div dir="ltr">
<div>
<div style="color:rgb(0,0,0);font-family:"bookman old style","new york",times,serif;font-size:16px" dir="ltr">Obrigado pela info Cesar, melhor terminologia na próxima.</div>
<div style="color:rgb(0,0,0);font-family:"bookman old style","new york",times,serif;font-size:16px" dir="ltr"> </div>
<div style="color:rgb(0,0,0);font-family:"bookman old style","new york",times,serif;font-size:16px" dir="ltr">Só trouxe para cá depois de quebrar cabeça um dia inteiro. </div>
<div style="color:rgb(0,0,0);font-family:"bookman old style","new york",times,serif;font-size:16px" dir="ltr"> </div>
<div style="color:rgb(0,0,0);font-family:"bookman old style","new york",times,serif;font-size:16px" dir="ltr">Obrigado </div>
</div>
</div>
<div><em style="font-family:Helvetica,Arial,sans-serif"><span style="color:rgb(0,0,191);font-size:medium"><span style="background-color:inherit;font-family:"Courier New",courier,monaco,monospace,sans-serif"> </span></span></em></div>
<div><em id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38508" style="font-family:Helvetica,Arial,sans-serif"><span id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38507" style="color:rgb(0,0,191);font-size:medium"><span style="background-color:inherit;font-family:"Courier New",courier,monaco,monospace,sans-serif">Diogo Jerônimo</span></span></em></div>
<div><em id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38430" style="font-family:Helvetica,Arial,sans-serif"><span id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38429" style="color:rgb(0,0,191);font-size:medium"><span style="background-color:inherit;font-family:"Courier New",courier,monaco,monospace,sans-serif">Bacharel em Ciências Estatísticas - ENCE/IBGE</span></span></em></div>
<div><em id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38309" style="font-family:Helvetica,Arial,sans-serif"><span id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38308" style="color:rgb(0,0,191);font-size:medium"><span style="background-color:inherit;font-family:"Courier New",courier,monaco,monospace,sans-serif">Mestre em Metrologia - PUC-Rio/PósMQI</span></span></em></div>
<div><em id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38329" style="font-family:Helvetica,Arial,sans-serif"><span id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38328" style="color:rgb(0,0,191);font-size:medium"><span id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38700" style="background-color:inherit;font-family:"Courier New",courier,monaco,monospace,sans-serif">CONRE: 8514 - SÉRIE A</span></span></em></div>
<div><em id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38323" style="font-family:Helvetica,Arial,sans-serif"><span id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38322" style="line-height:17.12px;color:rgb(0,0,191);font-size:medium"><span id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38695" style="background-color:inherit;font-family:"Courier New",courier,monaco,monospace,sans-serif"><a href="http://lattes.cnpq.br/8996149312896520" target="_blank">http://lattes.cnpq.br/8996149312896520</a></span></span></em></div>
</div>
<div> </div>
<div> </div>
</div>
<div id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpb97ed451yahoo_quoted_7007461531">
<div style="font-family:"Helvetica Neue",Helvetica,Arial,sans-serif;font-size:13px;color:rgb(38,40,42)">
<div>Em quarta-feira, 5 de agosto de 2020 14:53:45 BRT, Cesar Rabak <<a href="http://../../../undefined//compose?to=cesar.rabak@gmail.com" target="_blank">cesar.rabak@gmail.com</a>> escreveu:</div>
<div> </div>
<div> </div>
<div>
<div id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpb97ed451yiv5253136984">
<div>
<div dir="ltr">
<div dir="ltr">Diogo,
<div> </div>
<div>Na comunidade <span style="font-family:verdana,sans-serif"><strong>R</strong></span> temos um ditado que diz mais ou menos o seguinte (tradução livre deste escrivinhador) : « No <span style="font-family:verdana,sans-serif"><strong>R</strong></span> a pergunta nunca é <em>se</em> mas sim como <em>como</em> algo pode ser feito.»</div>
<div> </div>
<div>Pelo teor da sua pergunta você não domina os rudimentos da linguagem R (a minha evidência é o jeito como escreves a definição do vetor exemplo e o resultado desejado).</div>
<div> </div>
<div>Você já consultou um tutorial sobre R? Qual{is} abordagem{ns} você já considerou?</div>
<div> </div>
<div>--</div>
<div>Cesar Rabak</div>
<div> </div>
</div>
<br>
<div>
<div id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpb97ed451yiv5253136984yqt64457">
<div dir="ltr">On Wed, Aug 5, 2020 at 2:25 PM Diogo Jerônimo por (R-br) <<a href="http://../../../undefined//compose?to=r-br@listas.c3sl.ufpr.br" rel="nofollow" shape="rect" target="_blank">r-br@listas.c3sl.ufpr.br</a>> wrote:</div>
<blockquote style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">
<div>
<div style="font-family:"old times",serif;font-size:16px">
<div dir="ltr">Boa tarde a todos. Seja por exemplo o seguinte vetor:</div>
<div dir="ltr"> </div>
<div dir="ltr">x=(19,23,27,29)</div>
<div dir="ltr">
<div>
<div dir="ltr"> </div>
<div dir="ltr">É possível se obter no R um vetor com TODAS as diferenças absolutas entre TODOS os pares de valores combinados de um vetor? Ou seja:</div>
<div dir="ltr"> </div>
<div dir="ltr">vetor=(|19-23|,<span><span style="color:rgb(0,0,0);font-family:"old times",serif;font-size:16px">|19-27|,</span></span><span><span style="color:rgb(0,0,0);font-family:"old times",serif;font-size:16px">|19-29|,</span></span><span><span style="color:rgb(0,0,0);font-family:"old times",serif;font-size:16px">|23-27|,<span><span style="color:rgb(0,0,0);font-family:"old times",serif;font-size:16px">|23-29|,<span><span style="color:rgb(0,0,0);font-family:"old times",serif;font-size:16px">|27-29|)</span></span></span></span></span></span></div>
<div dir="ltr"><span><span style="color:rgb(0,0,0);font-family:"old times",serif;font-size:16px"><span><span style="color:rgb(0,0,0);font-family:"old times",serif;font-size:16px"><span><span style="color:rgb(0,0,0);font-family:"old times",serif;font-size:16px"> </span></span></span></span></span></span></div>
<div dir="ltr"><span><span style="color:rgb(0,0,0);font-family:"old times",serif;font-size:16px"><span><span style="color:rgb(0,0,0);font-family:"old times",serif;font-size:16px"><span><span style="color:rgb(0,0,0);font-family:"old times",serif;font-size:16px">Obrigado por qualquer ajuda!!!</span></span></span></span></span></span></div>
<div dir="ltr"> </div>
</div>
</div>
<div>
<div style="font-family:Helvetica,Arial,sans-serif;font-size:16px">
<div style="margin-bottom:0.0001pt;padding:0px;line-height:normal;background:white"><em id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38508"><span id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38507" style="color:rgb(0,0,191);font-size:medium"><span style="background-color:inherit;font-family:"Courier New",courier,monaco,monospace,sans-serif">Diogo Jerônimo</span></span></em></div>
<div style="margin-bottom:0.0001pt;padding:0px;line-height:normal;background:white"><em id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38430"><span id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38429" style="color:rgb(0,0,191);font-size:medium"><span style="background-color:inherit;font-family:"Courier New",courier,monaco,monospace,sans-serif">Bacharel em Ciências Estatísticas - ENCE/IBGE</span></span></em></div>
<div style="margin-bottom:0.0001pt;padding:0px;line-height:normal;background:white"><em id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38309"><span id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38308" style="color:rgb(0,0,191);font-size:medium"><span style="background-color:inherit;font-family:"Courier New",courier,monaco,monospace,sans-serif">Mestre em Metrologia - PUC-Rio/PósMQI</span></span></em></div>
<div style="margin-bottom:0.0001pt;padding:0px;line-height:normal;background:white"><em id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38329"><span id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38328" style="color:rgb(0,0,191);font-size:medium"><span id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38700" style="background-color:inherit;font-family:"Courier New",courier,monaco,monospace,sans-serif">CONRE: 8514 - SÉRIE A</span></span></em></div>
<div style="margin-bottom:0.0001pt;padding:0px;line-height:normal;background:white"><em id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38323"><span id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38322" style="line-height:17.12px;color:rgb(0,0,191);font-size:medium"><span id="gmail-m_-1080518285695070678gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38695" style="background-color:inherit;font-family:"Courier New",courier,monaco,monospace,sans-serif"><a href="http://lattes.cnpq.br/8996149312896520" rel="nofollow" shape="rect" target="_blank">http://lattes.cnpq.br/8996149312896520</a></span></span></em></div>
</div>
</div>
</div>
</div>
_______________________________________________<br> R-br mailing list<br> <a href="http://../../../undefined//compose?to=R-br@listas.c3sl.ufpr.br" rel="nofollow" shape="rect" target="_blank">R-br@listas.c3sl.ufpr.br</a><br> <a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" rel="nofollow" shape="rect" 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="nofollow" shape="rect" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.</blockquote>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
</blockquote>
</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" 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" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br><br></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>