现在使用R来做图，比如
x<-1:100
y<-2*x
plot(x,y)


现在想在这幅图上的右上角再画一幅小图，小图占整个大图面积的1/9，即长为大图长的1/3，宽为大图宽的1/3，如何才能实现？