automap fixes when target = NULL

[mdsumner]

No description provided.

[mdsumner]

@raymondben when ya ready

without this fix, in the second example the projection centre is NULL island (appropriate, but not desired)

library(SOmap)
mac <- raadtools::readtopo("macrie1100m")
p <- raster::raster(mac); dim(p) <- dim(p)/10
x <- raster::projectRaster(mac, p, method = "ngb")
a <- SOmap_auto(x, target = NULL)
a

print(a$bathy)
#> class      : RasterLayer 
#> dimensions : 300, 300, 90000  (nrow, ncol, ncell)
#> resolution : 1728.1, 4935.7  (x, y)
#> extent     : 232985, 751415, 3160045, 4640755  (xmin, xmax, ymin, ymax)
#> crs        : +proj=utm +zone=57 +south +datum=WGS84 +units=m +no_defs +ellps=WGS84 +towgs84=0,0,0 
#> source     : memory
#> names      : layer 
#> values     : -6388, 103  (min, max)
b <- SOmap_auto(x, target = "laea", dimXY = c(800, 400))
b

print(b$bathy)
#> class      : RasterLayer 
#> dimensions : 800, 400, 320000  (nrow, ncol, ncell)
#> resolution : 1304.521, 1851.107  (x, y)
#> extent     : -260930.3, 260878.2, -740417.7, 740467.9  (xmin, xmax, ymin, ymax)
#> crs        : +proj=laea +lat_0=-55.043161794395 +lon_0=158.87733578369 +x_0=0 +y_0=0 +datum=WGS84 +units=m +no_defs +ellps=WGS84 +towgs84=0,0,0 
#> source     : memory
#> names      : layer 
#> values     : -6388, 103  (min, max)

^{Created on 2019-06-04 by the reprex package (v0.3.0)}

[Maschette]

Your testthat tests are failing on appveyor as names dont match.

[mdsumner]

rounds out #50