points2line: Points to Line
In geophys: Geophysics, Continuum Mechanics, Gravity Modeling

Description Usage Arguments Details Value Author(s) See Also Examples

Given a point and a matrix of lines, calculate the projection of the vector of the point to the first coordinate of each line and the perpendicular distance.

1	points2line(Lp, VL)

`Lp`	Point list (x,y)
`VL`	Matrix of points, N by 4 as X1, Y1, X2, Y2

The first point in the matrix is considered the base.

list:

`rat`	cosine projection
`srat`	sine projection

Jonathan M. Lees<jonathan.lees@unc.edu>

REplane

S= stressSETUP()
      pstart()
PLOTbox(S$Rax, S$Rbox, axcol= 'green', boxcol= 'purple')
      PLOTplane(S$Rp, planecol="brown")

 basepoint = 3

        legpoints = c(7,4,2)

   

        VL =   cbind( rep(S$Rbox[basepoint,1] , length(legpoints)),
     rep(S$Rbox[basepoint,2] , length(legpoints)),
          S$Rbox[legpoints,1], S$Rbox[legpoints,2])

      Lp=list() 
Lp$x=c(40.0180732557)
Lp$y=c(40.4847345741)

 G = points2line(Lp, VL )