Вот один из способов: las=TRUE
повернуть метки по оси y и axis()
для новой оси y с помощью отрегулированных меток.
dates <- 1:10
returns <- runif(10)
plot(dates, returns, yaxt="n")
axis(2, at=pretty(returns), lab=pretty(returns) * 100, las=TRUE)