Marcando um evento do tempo no R (dúvida do webnário)

por Prof. Marcos Qui Out 18, 2018 8:33 pm

No webnário do dia 18-10-2018, a Roberta perguntou sobre isso. Segue um exemplo pronto:

Código:: #Pergunta da Roberta #Marcando eventos num gráfico (no tempo) set.seed(1) x<-1:10 y<-rnorm(10, 5, 2) plot(y ~ x, type="l", lty=2, las=1, ylim=c(0, 10)) points(y ~ x, pch=21, bg="white") #Digamos que eu queira marcar um evento no momento x=6 #Opção 1: linha vertical: plot(y ~ x, type="l", lty=2, las=1, ylim=c(0, 10)) points(y ~ x, pch=21, bg="white") abline(v=6, col="red", lty=2) #Opção 2: ponto de cor diferente: plot(y ~ x, type="l", lty=2, las=1, ylim=c(0, 10)) points(y ~ x, pch=21, bg="white") points(y[6] ~ x[6], pch=16, col="red") #Opção 3: usando uma seta!!!! plot(y ~ x, type="l", lty=2, las=1, ylim=c(0, 10)) points(y ~ x, pch=21, bg="white") arrows(x[6], y[6]+2, x[6], y[6]+0.5, length = 0.1, col="red") text(x[6], y[6]+2.5, "morte")