<div><span style="font-size: medium; color: #0000ff;">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="../../../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 #cccccc; 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: #000000; 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: #000000; font-family: 'bookman old style','new york',times,serif; font-size: 16px;" dir="ltr"> </div>
<div style="color: #000000; 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: #000000; font-family: 'bookman old style','new york',times,serif; font-size: 16px;" dir="ltr"> </div>
<div style="color: #000000; 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: #0000bf; 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_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38508" style="font-family: Helvetica,Arial,sans-serif;"><span id="gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38507" style="color: #0000bf; 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_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38430" style="font-family: Helvetica,Arial,sans-serif;"><span id="gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38429" style="color: #0000bf; 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_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38309" style="font-family: Helvetica,Arial,sans-serif;"><span id="gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38308" style="color: #0000bf; 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_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38329" style="font-family: Helvetica,Arial,sans-serif;"><span id="gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38328" style="color: #0000bf; font-size: medium;"><span id="gmail-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_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38323" style="font-family: Helvetica,Arial,sans-serif;"><span id="gmail-m_1953898600326825584ydpcf278505yui_3_16_0_1_1497025264182_38322" style="line-height: 17.12px; color: #0000bf; font-size: medium;"><span id="gmail-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_1953898600326825584ydpb97ed451yahoo_quoted_7007461531">
<div style="font-family: 'Helvetica Neue',Helvetica,Arial,sans-serif; font-size: 13px; color: #26282a;">
<div>Em quarta-feira, 5 de agosto de 2020 14:53:45 BRT, Cesar Rabak <<a href="../../../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_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_1953898600326825584ydpb97ed451yiv5253136984yqt64457">
<div dir="ltr">On Wed, Aug 5, 2020 at 2:25 PM Diogo Jerônimo por (R-br) <<a href="../../../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 #cccccc; 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: #000000; font-family: 'old times',serif; font-size: 16px;">|19-27|,</span></span><span><span style="color: #000000; font-family: 'old times',serif; font-size: 16px;">|19-29|,</span></span><span><span style="color: #000000; font-family: 'old times',serif; font-size: 16px;">|23-27|,<span><span style="color: #000000; font-family: 'old times',serif; font-size: 16px;">|23-29|,<span><span style="color: #000000; font-family: 'old times',serif; font-size: 16px;">|27-29|)</span></span></span></span></span></span></div>
<div dir="ltr"><span><span style="color: #000000; font-family: 'old times',serif; font-size: 16px;"><span><span style="color: #000000; font-family: 'old times',serif; font-size: 16px;"><span><span style="color: #000000; font-family: 'old times',serif; font-size: 16px;"> </span></span></span></span></span></span></div>
<div dir="ltr"><span><span style="color: #000000; font-family: 'old times',serif; font-size: 16px;"><span><span style="color: #000000; font-family: 'old times',serif; font-size: 16px;"><span><span style="color: #000000; 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_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38508"><span id="gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38507" style="color: #0000bf; 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_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38430"><span id="gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38429" style="color: #0000bf; 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_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38309"><span id="gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38308" style="color: #0000bf; 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_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38329"><span id="gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38328" style="color: #0000bf; font-size: medium;"><span id="gmail-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_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38323"><span id="gmail-m_1953898600326825584ydpb97ed451yiv5253136984gmail-m_3482108965387240979ydpcf278505yui_3_16_0_1_1497025264182_38322" style="line-height: 17.12px; color: #0000bf; font-size: medium;"><span id="gmail-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="../../../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 />R-br@listas.c3sl.ufpr.br<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>