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

expose mar for plot.osem_measurements(), fixes #12

Browse source
This commit is contained in:
Norwin 2018-01-05 00:13:53 +01:00
parent 8f70a242d0
commit 416d986c11
Signed by: norwin
GPG key ID: 24BC059DE24C43A3
1 changed files with 3 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
R/measurement_utils.R
View file

@ -1,7 +1,7 @@
#' @export #' @export
plot.osem_measurements = function (x, ...) { plot.osem_measurements = function (x, ..., mar = c(2,4,1,1)) {
oldpar = par() oldpar = par()
par(mar = c(2,4,1,1)) par(mar = mar)
plot(value~createdAt, x, col = factor(x$sensorId), xlab = NA, ylab = x$unit[1], ...) plot(value~createdAt, x, col = factor(x$sensorId), xlab = NA, ylab = x$unit[1], ...)
par(mar = oldpar$mar) par(mar = oldpar$mar)
invisible(x) invisible(x)
@ -10,6 +10,7 @@ plot.osem_measurements = function (x, ...) {
#' @export #' @export
print.osem_measurements = function (x, ...) { print.osem_measurements = function (x, ...) {
print.data.frame(x, ...) print.data.frame(x, ...)
invisible(x)
} }
#' Converts a foreign object to an osem_measurements data.frame. #' Converts a foreign object to an osem_measurements data.frame.