Uma pequena correção para que retorne valores absolutos vetor<-c(19,23,27,29) myf<-function(x){
aux<-c() result<-vector(mode="list") for(i in 1:length(x)-1){ for(j in (i+1):length(x)){ aux[j]<-x[i]-x[j] result[[j]]<-aux } } return(abs(na.omit(unlist(result)))) } myf(vetor) On Aug 5 2020, at 3:00 pm, Fernando Souza <nandodeso...@gmail.com> wrote: > Uma possível solução > > vetor<-c(19,23,27,29) > myf<-function(x){ > > aux<-c() > result<-vector(mode="list") > > for(i in 1:length(x)-1){ > > for(j in (i+1):length(x)){ > > aux[j]<-x[i]-x[j] > result[[j]]<-aux > } > > > > } > return(na.omit(unlist(result))) > } > > myf(vetor) > On Aug 5 2020, at 2:53 pm, Cesar Rabak por (R-br) <r-br@listas.c3sl.ufpr.br> > wrote: > > Diogo, > > > > Na comunidade R temos um ditado que diz mais ou menos o seguinte (tradução > > livre deste escrivinhador) : « No R a pergunta nunca é se mas sim como como > > algo pode ser feito.» > > > > 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). > > > > Você já consultou um tutorial sobre R? Qual{is} abordagem{ns} você já > > considerou? > > > > -- > > Cesar Rabak > > > > > > On Wed, Aug 5, 2020 at 2:25 PM Diogo Jerônimo por (R-br) > > <r-br@listas.c3sl.ufpr.br (mailto:r-br@listas.c3sl.ufpr.br)> wrote: > > > Boa tarde a todos. Seja por exemplo o seguinte vetor: > > > > > > x=(19,23,27,29) > > > > > > É 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: > > > > > > vetor=(|19-23|,|19-27|,|19-29|,|23-27|,|23-29|,|27-29|) > > > > > > Obrigado por qualquer ajuda!!! > > > > > > Diogo Jerônimo > > > Bacharel em Ciências Estatísticas - ENCE/IBGE > > > Mestre em Metrologia - PUC-Rio/PósMQI > > > CONRE: 8514 - SÉRIE A > > > http://lattes.cnpq.br/8996149312896520 > > > > > > > > > > > > > > > > > > _______________________________________________ > > > R-br mailing list > > > R-br@listas.c3sl.ufpr.br (mailto:R-br@listas.c3sl.ufpr.br) > > > https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br > > > Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça > > > código mínimo reproduzível. > > > > > > > > _______________________________________________ > > R-br mailing list > > R-br@listas.c3sl.ufpr.br > > https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br > > Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código > > mínimo reproduzível. >
_______________________________________________ R-br mailing list R-br@listas.c3sl.ufpr.br https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.