R/angle.R

In bashanyeyu/hmgeo: some tools for human(or economy) geogryphy study

Defines functions angle

Documented in angle

angle=function(x,y){
  numerator=sum(x*y)
  denominator=sqrt(sum(x*x))*sqrt(sum(y*y))
  return( acos(numerator/denominator))

}