R/ReturnReceiverCoordinates.R

ReturnReceiverCoordinates <-
function(sReceiver, iArraySize, CoordArray)
{
  sResult <- ""
  for (i in 1:iArraySize)
    if (sReceiver == CoordArray[i,1])
      # flip the lat/long to long/lat for KML
      sResult <- paste(CoordArray[i,3],CoordArray[i,2],sep=",")
  
  sResult
}

Try the VTrack package in your browser

Any scripts or data that you put into this service are public.

VTrack documentation built on May 2, 2019, 9:16 a.m.