opensensemap/opensensmapR
1
0
Fork 0
mirror of https://github.com/sensebox/opensensmapr synced 2025-06-04 12:36:13 +02:00
Code Issues Releases Wiki Activity

pass on ... in plot.sensebox()

Browse source 
fixes #24
This commit is contained in:
Norwin 2018-09-04 11:32:54 +02:00
parent 925909ebe8
commit f30bc9c185
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
R/box_utils.R
View file

@ -22,8 +22,8 @@ plot.sensebox = function (x, ..., mar = c(2, 2, 1, 1)) {
oldpar = par()
par(mar = mar)
plot(world, col = 'gray', xlim = bbox[c(1, 3)], ylim = bbox[c(2, 4)], axes = T)
plot(geom, add = T, col = x$exposure)
plot(world, col = 'gray', xlim = bbox[c(1, 3)], ylim = bbox[c(2, 4)], axes = T, ...)
plot(geom, add = T, col = x$exposure, ...)
legend('left', legend = levels(x$exposure), col = 1:length(x$exposure), pch = 1)
par(mar = oldpar$mar)