Добавление метки к вспомогательной оси в R

Question

У меня есть этот код:

# Plotting everything 
plot(p1, col= "lightgreen", xlim=c(-2.5,4.5), ylim=c(0, 700), main="Daily Total Precipitation for AR and Oct-May", xlab="ln(x)" , ylab="Frequency", xaxt = "n") # first histogram 
plot(p2, col="red", xlim=c(-2.5,4.5), ylim=c(0, 700), xaxt = "n" , add=T) 
# Adding in text labels on top of the bars 
text(x, y, paste(round(percents,2),"%"), cex=0.50, pos=3, offset=0.3, col="black") 
axis(side=1, at=breaks)  # new x-axis 
# parameter that needs to be set to add a new graph on top of the other ones 
par(new=T) 
plot(x, percents, xlim=c(-2.5,4.5), type="l", col="yellow", lwd=3.0, axes=F, ylab=NA, xlab=NA) 
axis(side=4, at=seq(0,100,by=10), col="yellow", col.axis="yellow")  # additional y-axis 
mtext("Percent", side=4, col="yellow") 
# legend settings 
legend("topleft", c("AR", "Oct-May"), lwd=10, col=c("red", "lightgreen")) 

Который производит этот график:

И я не могу показаться, чтобы выяснить, как получить вторичный ярлыка оси y, чтобы отображаться в правильном положении. Любая помощь или предложения очень приветствуются.

Редактировать: Использование RStudio.

Answer 1

Один из вариантов - указать аргумент line для mtext(). В приведенном ниже примере я добавляю еще пару строк вправо (side = 4) с помощью par(), а затем я рисую три ярлыка с использованием mtext() по умолчанию (line = 0), строка 3 (line = 3) и строка -3 (line = -3)):

op <- par(mar = c(5,4,4,4) + 0.1) 
plot(1:10) 
mtext("line0", side = 4) 
mtext("line3", side = 4, line = 3) 
mtext("line-3", side = 4, line = -3) 
par(op) 

Обратите внимание, что номера строк увеличить прочь из области участка и что отрицательные line значения смещают в область участка или слева от правой границы области печати.

Нужно немного сыграть с количеством линий разметки (как установлено в par(mar = x)) и какую строку вы хотите нарисовать, используя mtext(), но небольшая пробная версия и ошибка должны получить то, что вы хотите.

Заметим также, что вы сделать не необходимости указывать целое число значения для line аргумента. Вы также можете указать доли строк: line = 2.5.