r - R で 1 つのグラフに 3 つ以上の変数の時系列を描画する

Question

グラフの数を制限し、一度に複数の変数を分析できるようにするために、 plotrixパッケージのtwoord.plot関数を使用しています。

labels <- list("var1" = expression(paste("my Variable ", kg/m^2)),"var2" = expression(paste("Something ", kg/m^2)))

lx <- myVariables[[period]][["Date"]]
ly <- myVariables[[period]][[var1]]
ry <- myVariables[[period]][[var2]]

at_x <- lx[seq(1,length(lx),5)]

twoord.plot(lx,ly,lx,ry,xticklab=format(as.Date(at_x,"%d-%m-%Y"),"%b %Y"),xtickpos=at_x, main=paste(t_labels[[var1]], "and", t_labels[[var2]],sep=" ")

これは非常にうまく機能しますが、3 番目の変数をおそらくポイントとしてこのチャートに追加したいと考えています。言及されたデータには別のY軸が必要になるようです（またはそれらを乗算して、範囲がvar1またはvar2のいずれかと一致するようにします）。

それを行う最善の方法は何ですか？threeord.plot 関数はありません。