'jittered' scatterplotでドットにラベルを付ける方法

Question

散布図のすべての点に変数に関連付けられた国の名前を付けようとしていますが、すべてのラベルが下に移動しています。これはそれを行うための適切な方法ではありません：

plot(jitter(data$variable1,2), jitter(data$variable2,2), main = "Bivariate relationship between variable1 and variable2", xlim = c(0,100), ylim = c(0,100), xlab = "Variable 1", ylab = "Variable 2", col = "red", pch = 15) 

text(jitter(data$variable1,2), jitter(data$variable2,2), labels = data$Country) 

This is what the scatterplot looks like without labels そして、我々のデータセットは、このようなものです：

Country Variable1 Variable2 
France  2   2 
Turkey  1   3 

Answer 1

これは、あなたの質問にお答えしていますか？

Country=c("France", "Turkey") 
Variable1 = c(2, 1) 
Variable2 = c(2, 3) 
df = data.frame(Country, Variable1, Variable2) 
x1=jitter(Variable1, 2);x2=jitter(Variable2, 2) 
plot(x1, x2, xlim = c(min(x1)-1, max(x1)+1), ylim=c(min(x2)-1, max(x2)+1)) 
text(x1,x2, labels=df$Country, cex=.7, pos=3)