top of page

​Identificando pontos em um gráfico de dispersão

Função identify()

Função locator()

Identificando pontos em um gráfico de dispersão

​

Para os exemplos a seguir, clicar aqui para abrir o banco de dados em formato Excel.

​

# Primeiro, vamos gerar um gráfico de dispersão

​

plot(Peso,Altura,main="Peso e altura",xlim=c(40,120),ylim=c(1.4,1.8),bty="n",pch=19)

​

A função identify() permite identificar pontos em um gráfico de dispersão.

 

Posicione o cursor em forma de cruz sobre o gráfico, próximo a um ponto ou sobre ele.

​

Acionando o botão da esquerda do mouse, aparecerá na área de plotagem o número da linha do banco de dados associada àquele ponto.

​

Tecle ESC para sair.

​

identify(Peso,Altura)

Identificando coordenadas em um gráfico de dispersão

​

# Novamente, vamos gerar um gráfico de dispersão

​

plot(Peso,Altura,main="Peso e altura",xlim=c(40,120),ylim=c(1.4,1.8),bty="n",pch=19)

​

# Função locator(número_de_pontos)

​

Por exemplo, usando

​

locator(7)

​

será possível acionar o botão da esquerda do mouse sete vezes sobre a área de plotagem.

 

Logo após, serão exibidas as coordenadas destes sete pontos.

​

# Exemplo 1

​

plot(rnorm(12,30,2),ylab="Valores", xlab="Meses", main="Série de dados", ty="o", pch=19)

posicao <- locator(1)

text(posicao,"Intervenção")

​

# Exemplo 2

​

attach(dados)

tabela <- prop.table(table(esaude,Tabagismo),2)

cinzas <- gray(seq(0.1,0.9,length=3))

barplot(100*tabela,main="(a) Autoavaliação do estado de saúde",ylab="Número de pessoas (%)",beside=T,names=c("Não fumantes","Fumantes"),cex.lab=1.3,cex.names=1.3,cex.axis=1.3,las=1,col=cinzas)

posicao <- locator(1)

legend(posicao, legend=c("Bom","Regular","Ruim"), cex = 1.2, fill=cinzas, bty="n")

​

bottom of page