Displaying 1 result from an estimated 1 matches for "distance_slice".
2011 Jan 20
1
Generating time progressing line for Google Earth
...##########
GenerateLineSegments <- function(start_point.Long, start_point.Lat,
end_point.Long, end_point.Lat, numberOfIntervals) {
coords <- matrix(NA, numberOfIntervals, 2)
full_distance = gcd.slc(lat1 = start_point.Lat, lon1 =
start_point.Long, lat2 = end_point.Lat, lon2 = end_point.Long)
distance_slice = full_distance / numberOfIntervals
for(i in 1 : numberOfIntervals) {
distance = i * distance_slice
ang_dist = distance / 6371.0
lon_1 = Radians(start_point.Long);
lat_1 = Radians(start_point.Lat);
lat_2 = Radians(end_point.Lat);
lon_diff = Radians(end_point.Long - start_point.Long);
# First c...