[R-br] Selecionar o primeiro numero negativo depois do último positivo.

[Luis Iván Ortiz Valencia]

x[which(diff(x>0)==-1)+1]


Em 28 de outubro de 2013 15:59, Paulo Justiniano <paulojus em leg.ufpr.br>escreveu:

> x <- c(10, 12, 11, 5, 4, -5, -10, -11, -15, 4, 5, 6, 8, 10, 8, 5, 4, -6,
> -2, 4, 8)
> x1 <- ifelse(x < 0, 1, 0)
> x[which(diff(x1) == 1)+1]
> [1] -5 -6
>
>
>
>
>
> On Mon, 28 Oct 2013, Alisson Lucrecio wrote:
>
>  Caro Colegas da lista r-br,
>>
>> Boa tarde.
>>
>> Eu estou precisando encontrar o primeiro numero negativo depois do último
>> numero
>> positivo de uma sequencia c(10, 12, 11, 5, 4, -5, -10, -11, -15, 4, 5, 6,
>> 8, 10, 8,
>> 5, 4, -6, -2, 4, 8). Assim o numero selecionado seriam -5 e -6. Algum de
>> vocês
>> poderia me ajudar com uma função que tivesse tal finalidade?
>>
>> Obrigado.
>>
>> Alisson Lucrécio da Costa
>>
>>
> _______________________________________________
> R-br mailing list
> R-br em 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.
>



-- 
Luis Iván Ortiz Valencia
Doutorando Saúde Pública - Epidemiologia, IESC, UFRJ
Estatístico Msc.
Spatial Analyst Msc.
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20131029/a3912163/attachment.html>