Как помечать точки в «дрожащей» диаграмме рассеяния

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)