我正在绘制一张地图,该地图应该包含来自数据集的多个(> 400)箭头的叠加,该箭头具有每个箭头的开始和结束的纬度/经度对.以下是使用dput的数据子集:
df <- structure(list(Lat = c(49.34054, 49.34068, 49.3409, 49.34106,
49.34116, 49.34133, 49.34138, 49.34144, 49.34155, 49.34164, 49.34168,
49.34178, 49.34179, 49.34187, 49.34199, 49.34202, 49.3421, 49.34219,
49.34226, 49.34236, 49.3424), Lon = c(-117.76365, -117.76433,
-117.76474, -117.76575, -117.76646, -117.76607, -117.76643, -117.76676,
-117.76611, -117.76638, -117.76678, -117.76612, -117.7671, -117.76678,
-117.76776, -117.76745, -117.76706, -117.76815, -117.76778, -117.76762,
-117.76812), LatEnd = c(49.3404216917208, 49.3404813977525, 49.3407696999527,
49.3409218055133, 49.3408834255181, 49.3411571438575, 49.3411444104952,
49.3412068979592, 49.3413453850968, 49.3414853385912, 49.3414067819334,
49.3415646398153, 49.3415782191525, 49.3416671210859, 49.341769715577,
49.3418702688525, 49.3418749917805, 49.3419107724121, 49.3418905356976,
49.3421097403974, 49.3419881060831), LonEnd = c(-117.76319214364,
-117.763951728004, -117.76423214535, -117.765201260725, -117.766005995062, …