Base Plot，正确定义轴

Question

我使用基础图创建一个图形，显示两个图形（温度和相对湿度），两个y轴和一个显示时间的公共x轴。我将x轴从0限制为24，因此它显示了一天中的小时数。 我的问题是，x轴上显示的数字的范围仅为0到20，步长为5，但我希望以3为步长显示步数3，以获得从0到24的漂亮时间轴。

如何将X轴设置为这样？

这是我的情节

这是我到目前为止使用的代码：

    ### Plot 1

  d1 = data.frame(Uhrzeit =D.Log.1t$Uhrzeit,
                 Temperatur = D.Log.1t$Temperatur,
                 rH = D.Log.1r$RH)


  par(mar = c(5,5,5,5))
  with(d1, plot(Uhrzeit, Temperatur, type="l", col="red3", 
                 ylim=c(0,40), xlim=c(0,24)))

  par(new = T)
  with(d1, plot(Uhrzeit, rH,  axes=F, type="l",  col="blue",
               ylim=c(0, 100)))
  axis(side = 4)
  mtext(side = 4, line = 3, 'rH')
  par(mar=c(5.1, 14, 4.1, 8.1), xpd=TRUE)
  legend("top",  inset=c(0,-0.2), legend=c("Temperatur in °C","rH in %"), lty=c(1, 1), col=c("red3", "blue"))