Como rótulo de pontos em um gráfico de dispersão com R?
-
14-11-2019 - |
Pergunta
Eu sou novo para R e gostaria de saber como rótulo de pontos de dados em um gráfico de dispersão.Eu tentei o seguinte código, mas estou recebendo um erro.
x = c(102856,17906,89697,74384,91081,52457,73749,29910,75604,28267,122136,
54210,48925,58937,76281,67789,69138,18026,90806,44893)
y = c(2818, 234, 2728, 2393, 2893, 1015, 1403, 791, 2243, 596, 2468, 1495,
1232, 1746, 2410, 1791, 1706, 259, 1982, 836)
plot(x, y, main="Scatterplot ", xlab="xaxis ", ylab="yaxis ", pch=19)
names = c("A","C","E","D","G","F","I","H","K","M","L","N","Q","P","S","R",
"T","W","V","Y")
library(calibrate)
textxy(x, y, labs=names, cx = 0.5, dcol = "black", m = c(0, 0))
Error in text.default(X[posXposY], Y[posXposY], labs[posXposY], adj = c(-0.3, :
plot.new has not been called yet
Eu não entendo sobre esse erro.Por favor me ajude
Solução
Você poderia fazê-lo em ggplot2
:
require(ggplot2)
d <- data.frame(x = c(102856,17906,89697,74384,91081,52457,73749,29910,75604,28267,122136, 54210,48925,58937,76281,67789,69138,18026,90806,44893), y = c(2818, 234, 2728, 2393, 2893, 1015, 1403, 791, 2243, 596, 2468, 1495, 1232, 1746, 2410, 1791, 1706, 259, 1982, 836), names = c("A","C","E","D","G","F","I","H","K","M","L","N","Q","P","S","R","T","W","V","Y"))
ggplot(d, aes(x,y)) + geom_point() + geom_text(aes(label=names))
Você pode desejar que os rótulos de texto para não ser directamente em cima dos pontos, que você pode realizar usando o hjust
ou vjust
argumentos geom_text
a parte.
Outras dicas
Você pode facilmente criar esta usando o text()
função.
text(x,y,labels=names)
O código funciona para mim com:
> sessionInfo()
R version 2.14.2 Patched (2012-02-29 r58525)
Platform: x86_64-unknown-linux-gnu (64-bit)
locale:
[1] LC_CTYPE=en_GB.utf8 LC_NUMERIC=C
[3] LC_TIME=en_GB.utf8 LC_COLLATE=en_GB.utf8
[5] LC_MONETARY=en_GB.utf8 LC_MESSAGES=en_GB.utf8
[7] LC_PAPER=C LC_NAME=C
[9] LC_ADDRESS=C LC_TELEPHONE=C
[11] LC_MEASUREMENT=en_GB.utf8 LC_IDENTIFICATION=C
attached base packages:
[1] stats graphics grDevices utils datasets methods
[7] base
other attached packages:
[1] calibrate_1.7 mgcv_1.7-13
loaded via a namespace (and not attached):
[1] grid_2.14.2 lattice_0.20-0 Matrix_1.0-4 nlme_3.1-103
[5] tools_2.14.2
Verifique se você tem um up-to-date R e a versão do calibrar e se não atualizá-los e tente novamente.
Seria mais natural usar a seguinte ordem de chamadas:
> library(calibrate)
> names = c("A","C","E","D","G","F","I","H","K","M","L","N","Q","P","S","R",
+ "T","W","V","Y")
> plot(x, y, main="Scatterplot ", xlab="xaxis ", ylab="yaxis ", pch=19)
> textxy(x, y, labs=names, cx = 0.5, dcol = "black", m = c(0, 0))
Ele não faz qualquer diferença se o enredo janela produzido pelo plot()
chamada ainda está em aberto.
Você não precisa calibrar pacote.Você pode fazer:
texto (x, y-50, nomes)
Ela não funciona para mim.