図の中に小さい図をplot

plot した図の中に、小さめの図をさらに plot する方法。
"R plot inset" でググったら下記にいきつきました。

　https://stat.ethz.ch/pipermail/r-help/2005-December/084105.html

とりあえず gridBase というパッケージを使ってみて
下記のようなグラフが描けるようになりました。
よくわからないパラメーターもあるのですが、
とりあえず描けたのでいいか (^^;




==========
x<-seq(0, 10, by = 0.1)
y<-0.5^x;

library(gridBase)

plot(y~x,ylim=c(0,1),xlim=c(0,10),tcl=0.4,col=2,ps=15,type="l",lwd=2)
   vp <- baseViewports()
   pushViewport(vp$inner,vp$figure,vp$plot)
   pushViewport(viewport(x=0.45,y=0.8,
                         width=.6,height=.75,just=c("left","top")))

par(fig=gridFIG(),new=T,ps=10)

plot(cos,ylim=c(-1,1),xlim=c(0,10),tcl=0.4,lty=2)