Карты маршрутов в R - PullRequest
Новая
       61

Карты маршрутов в R

0 голосов
/ 04 апреля 2020

Я только начал работать с R. Я пытаюсь нанести данные долготы и широты между двумя узлами на карте.

У меня есть 4 столбца данных (начальная долгота, начальная широта; конечная долгота, конец широта) - все в пределах США.

Я использовал код из rstudio-pubs-stati c.

Данные: 

      slong    slat     elong    elat
1  -73.9440 40.6610 -122.2708 37.8044
2 -118.2500 34.0500 -117.8897 33.8361
3 -117.8897 33.8361 -118.2500 34.0500

Код: 

library(ggplot2)
library(ggrepel)

moveall <- read.csv("moveall.csv", stringsAsFactors = FALSE)
head(moveall,3)


usMap <- borders("state", colour="grey", fill="white")

ggplot() + usMap


allUSA <- ggplot() + usMap +
  geom_curve(data=moveall,
             aes(x=slong, y=slat, xend=elong, yend=elat),
             col="#00008b",
             size=.5,
             curvature=0.2) +
  geom_point(data=moveall,
             aes(x=slong, y=slat), 
             colour="blue",
             size=1.5) +
  geom_point(data=moveall,
             aes(x=elong, y=elat), 
             colour="blue") +
  theme(axis.line=element_blank(),
        axis.text.x=element_blank(),
        axis.text.y=element_blank(),
        axis.title.x=element_blank(),
        axis.title.y=element_blank(),
        axis.ticks=element_blank(),
        plot.title=element_text(hjust=0.5, size=12)) +
  ggtitle("Movement Map")

allUSA

Сообщение об ошибке: ' Дискретное значение передано в непрерывную шкалу "

Я попытался отформатировать числа, но это не сработало.

Буду признателен за идеи / предложения Эми.

1 Ответ

0 голосов
/ 04 апреля 2020

ОБНОВЛЕНИЕ: кажется, мой файл .csv был поврежден. Вставка копии с использованием буфера обмена в новый фрейм данных устраняет ошибку

...