Openstreetmap的问题，报错Error in minY:maxY : NA/NaN argument

wx_yaCC5zeS

求各位大神帮忙看看是什么问题~~~

load(file.choose())
crs.val<-CRS("+proj=longlat +datum=WGS84 +no_defs +ellps=WGS84 +towgs84=0,0,0")
## Load an OpenStreetMap backdrop
ul<-as.vector(cbind(bbox(en.county)[2,2], bbox(en.county)[1,1]))
lr<-as.vector(cbind(bbox(en.county)[2,1], bbox(en.county)[1,2]))
# download the map tile
MyMap<-openmap(ul,lr,9,'osm')


运行openmap这一步报错  Error in minY:maxY : NA/NaN argument
我输入的数据是一个Large SpatialPolygonDataFrame， ul/lr所获取的值分别为num[1:2] 416919 1506734及num[1:2] 525421 1441727

求问这是什么问题？？
跪谢！