R легенда не работает

Question

Я новичок. Я рисую 4 приближения к линии. Я хочу поставить легенду на верхний угол. Я пробовал:

legend(
"topleft", legend=....) 

Затем я попытался вручную установить положение, которое все еще не работает. Вот мой код, и мой участок:

plot(1:N, vRm, pch=".", col="blue", xlab="m", ylim=c(0.885, 0.91)) 
ylab="approximated 90th percentile") 
lines(1:N, v1m, pch=".", col="yellow") 
lines(1:N, v2m, pch=".", col="green") 
lines(1:N, v3m, pch=".", col="red") 

legend(
y=0.92, legend=c("quantile","90st", "91st", 
"(90st+91st)/2"), col=c("blue", "yellow", "green", "red"), pch=c(".",".", ".", ".") 
) 

и сюжет:

как я могу поместить легенду на верхнем углу?

Answer 1

В определении вашей легенды вы не определяете опцию x в легенде функции. Обратите внимание на ссылку R:

Местоположение можно также указать, установив x по одному ключевому слову из списка "bottomright", "bottom", "bottomleft", "left", "topleft", "top", "topright", "right" и "center". Это помещает легенду в рамку графика в данном месте. Используется частичное сопоставление аргументов. Дополнительный аргумент вставки указывает, насколько далека легенда вставки из полей графика. Если задано одно значение, оно используется для обоих полей; если заданы два значения, первый используется для x-расстояния, второй для y-расстояния.

Таким образом, вы можете разместить на верхнем Rigth, например, с помощью этой команды:

legend(x= "topright", y=0.92, 
     legend=c("quantile","90st", "91st", "(90st+91st)/2"), 
     col=c("blue", "yellow", "green", "red"), 
     pch=c(".",".", ".", "."))