R语言 voronoi包 angle()函数中文帮助文档(中英文对照)

loveR

angle(voronoi)
angle()所属R语言包：voronoi

                                         Angle of a vector
                                         一个向量的角度

                                         译者：生物统计家园网 机器人LoveR

描述----------Description----------

Finds the angle (in radians) of the vector from p1 to p2.
查找矢量p1到p2的角度（弧度）。


用法----------Usage----------


angle(p1, p2)



参数----------Arguments----------

参数：p1
A vector of length two containing an x coordinate and a y coordinate.
包含x坐标和y坐标的向量长度为二。


参数：p2
A vector of length two containing an x coordinate and a y coordinate.
包含x坐标和y坐标的向量长度为二。


值----------Value----------

A scalar angle in radians.
标量弧度。


（作者）----------Author(s)----------



David M. Diez and Christopher D. Barr




参见----------See Also----------

fd
fd


实例----------Examples----------


show.angle <- function(p1, p2, theta, ...) {
   r      <- as.vector(dist(rbind(p1, p2)))
   thetas <- seq(0, theta, length.out = 100)
   arc    <- cbind(p1[1]+(r/3)*cos(thetas), p1[2]+(r/3)*sin(thetas))
   plot(c(p1[1]-r, p1[1]+r), c(p1[2]-r, p1[2]+r),
      type = "n", axes = FALSE, ...)
   segments(p1[1], p1[2], p2[1], p2[2], lty = 2, col = gray(.5))
   segments(p1[1], p1[2], p1[1] + r, p1[2], lty = 2, col = gray(.5))
   lines(arc, col = "red", lty = 2)
   points(rbind(p1, p2))
   box()
}

par(mfrow = c(2,2))
for(i in 1:4) {
   p1   <- runif(2, -10, 10)
   p2   <- runif(2, -10, 10)
   an   <- angle(p1, p2)
   main <- paste("Theta = ", round(an, 2))
   show.angle(p1, p2, an, main = main, xlab = "", ylab = "")
}

转载请注明:出自 生物统计家园网(http://www.biostatistic.net)。


注：
注1：为了方便大家学习，本文档为生物统计家园网机器人LoveR翻译而成，仅供个人R语言学习参考使用，生物统计家园保留版权。
注2：由于是机器人自动翻译，难免有不准确之处，使用时仔细对照中、英文内容进行反复理解，可以帮助R语言的学习。
注3：如遇到不准确之处，请在本贴的后面进行回帖，我们会逐渐进行修订。