mtext () чтобы добавить горизонтальные метки y

Question

Я знаю, что это будет быстро и просто для некоторых из вас. Я просто хочу иметь метку горизонтальной оси Y, используя mtext(). Я думаю, это связано с прилагательным, но я потратил впустую последние 2 часа, пытаясь понять это ... В следующих примерах я просто хочу, чтобы y-метки (myLab) были горизонтальными и выровненными по левому краю.

myLab <- c("aaaaaaa", "bb", "c")

par(oma=c(0,10,0,0)) # make a large left maring for the labels

plot(x=c(1:3),
     y=c(1:3),
     pch="|",
     lwd=3,
     tck=0.01,
     yaxt="n",
     ylab="",
     xlab="my legend",
     at= c(1:3),
     )


mtext(text=myLab,
      side=2,
      outer = FALSE,
      at=c(1:3)
      )

Мне не нужно использовать mtext(). Если у вас есть лучшая альтернатива, пожалуйста, дайте мне знать.

Спасибо!

Answer 1

Используйте аргумент las:

mtext(text=myLab, las=1,
       side=2,
       outer = FALSE,
       at=c(1:3)
       )

Приносит их прямо к краю, но вы можете дополнить их пробелами в значениях myLab. Вы можете выровнять по левому краю, используя adj значение 0 (против значения по умолчанию 1):

 plot(x=c(1:3),
      y=c(1:3),
      pch="|",
      lwd=3,
      tck=0.01,
      yaxt="n",
      ylab="",
      xlab="my legend"  # removing extraneous `at` value that only throws a warning
      )
 mtext(text=myLab, las=1, adj=0,
        side=2,
        outer = FALSE,
        line=3.5, at=1:3
        )