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

loveR

bearing(SpatialVx)
bearing()所属R语言包：SpatialVx

                                         Find the bearing from one spatial location to another
                                         查找轴承从一个空间位置的另一

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

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

Find the bearing from one spatial location to another.
查找轴承从一个空间位置到另一个。


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


bearing(point1, point2, deg = TRUE, aty = "compass")



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

参数：point1, point2
two-column numeric matrices giving lon/lat coordinates for the origin point(s) (point1) and the destination point(s) (point2).
两列的数字矩阵为经度/纬度坐标的原点（S）（point1）和目标点（S）（point2“）。


参数：deg
logical, should the output be converted from radians to degrees?  
逻辑，应在输出从弧度转换为度？


参数：aty
character stating either "compass" (default) or "radial".  The former gives the standard compass bearing angle (0 is north, increase clockwise), and the latter is for polar coordinates (0 is East, increase counter-clockwise).  
字符，说明无论是“指南针”（默认）或“放射状”。前者给出了标准的罗盘方位角度（0北，增加顺时针方向），而后者是极坐标（0东，增加逆时针）。


Details

详细信息----------Details----------

The bearing, beta, of a point B as seen from a point A is given by
的轴承，β，B点，如从一个点看到甲由下式给出

beta = atan2(S,T)
β= ATAN2（S，T）

where
哪里

S = cos(phi_B) * sin(L_A - L_B), and
S = COS（phi_B）*的罪（L_A  -  L_B）

T = cos(phi_A)*sin(phi_B) - sin(phi_A)*cos(phi_B)*cos(L_A - L_B)
T = COS（phi_A）的*的罪（phi_B） - 罪（phi_A）* COS（phi_B）的COS（L_A  -  L_B）

where phi_A (phi_B) is the latitude of point A (B), and L_A (L_B) is the longitude of point A (B).
，在那里phi_A（phi_B）是纬度的点A（B），和L_A（L_B）的经度点A（B）。

Note that there is no simple relationship between the bearing of A to B vs. the bearing of B to A.  The bearing given here is in the usual R convention for lon/lat information, which gives points east of Greenwich as negative longitude, and south of the equator as negative latitude.
请注意，有没有简单的关系B对B到A的轴承轴承的轴承这里给出的是在平时的ŕ约定经度/纬度信息，这给分东格林威治负经度，南部为负纬度的赤道。


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

numeric giving the bearing angle.
数值给轴承角。


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



Eric Gilleland and Randy Bullock




参考文献----------References----------



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

atan2, FeatureAxis, rdist.earth
atan2，FeatureAxis，rdist.earth


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


A <- rbind(c(-105.2833, 40.0167), c(137.65, -33.9333)) # Boulder, Colorado and Wallaroo, Australia.[科罗拉多州博尔德市位于Wallaroo，澳大利亚。]
B <- rbind(c(137.65, -33.9333), c(-105.2833, 40.0167)) # Wallaroo, Australia and Boulder, Colorado.[位于Wallaroo，澳大利亚和科罗拉多州博尔德市。]
bearing(A,B)
bearing(A,B,aty="radial")
plot(A, type="n", xlab="", ylab="")
points(A[,1], A[,2], pch="*", col="darkblue")
arrows(A[1,1], A[1,2], A[2,1], A[2,2], col="red", lwd=1.5) # Boulder, Colorado to Wallaroo, Australia.[，美国科罗拉多州博尔德市，澳大利亚Wallaroo以。]

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


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