writeOGR层创建失败- MySQL

Question

我试图加载多多边形边界到mysql。以下是我迄今所尝试过的，

1. 安装了带有mysql驱动程序的gdal。在R中使用ogrDrivers()进行检查，它在驱动程序列表中返回MySQL。 db <- 'testdb‘用户<- 'testuser’pwd <-‘*’主机<- '127.0.0.1‘DSN =paste0(’MySQL：，db，'，user='，user，'，主机，'，口令=‘，pwd) data_2013 <- readOGR(dsn = "/Path/to/shapefile"，layer = "testinglayer") writeOGR(data_2013，dsn=DSN，driver='MySQL'，layer='testinglayer'，layer_options='ENGINE=Aria'，overwrite_layer = TRUE)

但我得到了这个错误，

Error in writeOGR(data_2013, dsn = DSN, driver = "MySQL", layer = "testinglayer",  : 
  Layer creation failed

或者还有其他方法可以将空间多边形数据从R加载到MySQL？

编辑:根据要求，

> ogrDrivers()$name
 [1] "AeronavFAA"     "AmigoCloud"     "ARCGEN"         "AVCBin"         "AVCE00"        
 [6] "BNA"            "CAD"            "Carto"          "Cloudant"       "CouchDB"       
[11] "CSV"            "CSW"            "DGN"            "DXF"            "EDIGEO"        
[16] "ElasticSearch"  "ESRI Shapefile" "Geoconcept"     "GeoJSON"        "Geomedia"      
[21] "GeoRSS"         "GFT"            "GML"            "GMLAS"          "GPKG"          
[26] "GPSBabel"       "GPSTrackMaker"  "GPX"            "HTF"            "HTTP"          
[31] "Idrisi"         "Interlis 1"     "Interlis 2"     "JML"            "JP2OpenJPEG"   
[36] "JPEG2000"       "KML"            "LIBKML"         "MapInfo File"   "Memory"        
[41] "MSSQLSpatial"   "MySQL"          "NAS"            "netCDF"         "ODBC"          
[46] "ODS"            "OGR_DODS"       "OGR_GMT"        "OGR_PDS"        "OGR_SDTS"      
[51] "OGR_VRT"        "OpenAir"        "OpenFileGDB"    "OSM"            "PCIDSK"        
[56] "PGDUMP"         "PGeo"           "PLSCENES"       "REC"            "S57"           
[61] "SEGUKOOA"       "SEGY"           "Selafin"        "SQLite"         "SUA"           
[66] "SVG"            "SXF"            "TIGER"          "UK .NTF"        "VDV"           
[71] "VFK"            "Walk"           "WAsP"           "WFS"            "XLS"           
[76] "XLSX"           "XPlane"   

Answer 1

看看这个链接，参数必须是逗号分隔的。所以也许这会奏效：

DSN = paste0('MYSQL:dbname=',db ,', user=', user, ', host=', host, ', password=', pwd, ', port=', port)

或者您试过使用sf包吗？

DSN = paste0('MYSQL:dbname=',db ,' user=', user, ' host=', host, ' port=', port, ' password=', pwd)

library(sf)
data(meuse)
st_write(st_as_sf(meuse, coords = c("x","y")), dsn = DSN,  layer = "testinglayer")

或将host <- '127.0.0.1'更改为host <- "localhost"

Answer 2

首先，感谢@SeGa的不断帮助，使用它，我可以设法最终加载数据。但有一些更正，这就是为什么我要详细说明作为一个单独的答案。

library(sf)
fname <- "/path/to/shapefile/data_2013.shp"
data_2013 <- st_read(fname)

db <- 'testdb'
user <- 'testuser'
pwd <- '****'
host <- '127.0.0.1'
port <- 3306
DSN = paste0('MySQL:',db ,',user=', user,',password=', pwd, ',port=', port)

st_write(obj = data_2013, dsn = DSN, layer = "data_2013")

DSN必须与上面的完全相同，其中没有“dbname”字符串。而且，命令必须是这样的。因为，gdal期望，如果您查看这个链接- mysql.html

我试着用mysql连接，它不起作用，但是给mysql起作用了。唯一的问题是，这会在数据库中创建一些额外的表(geometry_columns、spatial_ref_sys)。

再次感谢你的帮助@SeGa。