使用R中的識別功能

Question

在散點圖中，我想使用identify函數來標記右上方的點。

我這樣做：

identify(x, y, labels=name, plot=TRUE) 

*我有一個名爲向量。

然後，當它正在運行時，我指向正確的點。然後在停止它之後，它顯示了該點的標籤 。

我是否必須點擊每次要標記的點？我可以保存嗎？

Answer 1

# Here is an example 

x = 1:10 
y = x^2 

name = letters[1:10]  
plot(x, y) 

identify(x, y, labels = name, plot=TRUE) 

# Now you have to click on the points and select finish at the end 
# The output will be the labels you have corresponding to the dots. 

關於它保存： 使用

pdf() 
# plotting code 
dev.off() 

但是在Rstudio是更多鈔票，以「複製 - 粘貼」它，我不能這樣做。如果你只需要一個情節，我想這會奏效。

Answer 2

可以使用identify函數的返回值重現標籤：

labels <- rep(letters, length.out=nrow(cars)) 
p <- identify(cars$speed, cars$dist, labels, plot=T) 

#now we can reproduce labelling 
plot(cars) 
text(cars$speed[p], cars$dist[p], labels[p], pos=3) 

要保存的情節使用identify後，您可以使用dev.copy：

labels <- rep(letters, length.out=nrow(cars)) 
identify(cars$speed, cars$dist, labels, plot=T) 
#select your points here  

dev.copy(png, 'myplot.png', width=600, height=600) 
dev.off()