在带有两个y轴的图的一个y轴上添加刻度线

Question

我的数据：

a = c(5,2,1)
b = c(75,82,36)
c <- c("Baseline", "FW1", "FW2")

我的代码：

finyrNum <- (1:3)
twoord.plot(finyrNum, a, finyrNum, b,
            type=c("bar", "l"), lylim = c(0, 7),
            ylab="Days Used", rylab="Amount", xlab="Time Point",
            lcol=32, rcol=4, do.first="plot_bg()", xticklab=c) 

这将创建一个如下图所示的图：

如何更改左侧的y轴，以使刻度线变为7，而不是在5处停止？

还-如何更改边距，以使图的边界和条形之间有空间？

Answer 1

twoord.plot(finyrNum, a, finyrNum, b,
            type=c("bar", "l"), lylim = c(0, 7), lytickpos = 1:7,
            ylab="Days Used", rylab="Amount", xlab="Time Point",
            lcol=32, rcol=4, do.first="plot_bg()", xticklab=c) 

您正在寻找lytickpos。查阅twoord.plot的文档，有很多图形选项可供探索。