R语言如何作双坐标图

tomorrow

在 R 中可以通过绘图参数 par(new = TRUE)使得绘制第二个绘图 (hight-level plot) 时保留第一个
绘图区域，这样两张绘图会重叠在一起，看起来就是双坐标图。下面的例子是在同一张图上绘制
GDP 和失业率 (UR)：
year <- 1995:2005
x1 <- data .frame(year , GDP = sort (rnorm(11 ,1000 ,100)))
x2 <- data .frame(year , UR = rnorm(11 ,5 ,1))
par(mar = c(5 ,4 ,4 ,6)+0.1)
plot(x1, axes = FALSE, type="l")
axis (1 ,at = year , label = year ); axis (2)
par(new = T, mar = c(10 ,4 ,10 ,6) + 0.1)
plot(x2, axes = FALSE, xlab = "",ylab = "", col = "red",type= "b")
mtext("UR(%)" ,4 ,3 , col="red")
axis (4 , col ="red", col . axis = "red")
或者使用 plotrix 包中，twoord.plot() 函数
twoord. plot (2:10 , seq(3 ,7 ,by=0.5)+rnorm(9) ,
1:15 ,rev(60:74)+rnorm(15) ,xlab="Sequence",
ylab="Ascending values",rylab="Descending values",
main="Test of twoord.plot")
但不推荐使用双坐标图来进行数据描述，这样很容易造成误解。并且在 R 中做出并排图形作
对比很容易，没有必要绘制双坐标图。

木木爱写歌

您能用R软件求两坐标的距离吗？给出20个点，分别求出他们之间的距离？