如何分割csv文件中的坐标系以使用R进行映射？

Question

我有一个数据集Arrest.csv

该数据集中的一列是位置。我想绘制一个视觉地图，但我不知道如何将它们分开。

例如：位置（33.9543，-118.2827）我有经度和纬度。但是，如何在csv文件中将它们拆分为X和Y col。

这是我的csv文件：

Arrest data

示例代码：

library(tidyverse)
library(readr)
library(dplyr)
library(DT)
library(ggrepel)
library(leaflet)
library(sp)
library(rgdal)




install.packages("ggmap")


crime.data <- read.csv("ArrestData.csv")   
require(leaflet)

data <- crime.data[1:10000,] # display the first 10,000 rows
data$popup <- paste("<b>Report #: </b>", data$`Report ID`, "<br>", 
                "<b>Category: </b>", data$Charge,
                "<br>", "<b>Description: </b>", data$`Charge Group Description`,
                #"<br>", "<b>Day of week: </b>", data$DayOfWeek,
                "<br>", "<b>Date: </b>", data$`Arrest Date`,
                "<br>", "<b>Time: </b>", data$Time,
                "<br>", "<b>PD district: </b>", data$`Area Name`,
                "<br>", "<b>Resolution: </b>", data$Resolution,
                "<br>", "<b>Address: </b>", data$Address
                "<br>", "<b>Longitude: </b>", data$X,
                "<br>", "<b>Latitude: </b>", data$Y)

Answer 1

您可以使用str_match

df <- as.data.frame(str_match(data$Location, "\\((.*), (.*)\\)"), 
                              stringsAsFactors = FALSE)

纬度为df$V2，经度为df$V3。