show units in measurements plot
parent
3ed57a4c49
commit
3f46a52b3c
@ -1,6 +1,8 @@
|
|||||||
#' @export
|
#' @export
|
||||||
plot.osem_measurements = function (x, ...) {
|
plot.osem_measurements = function (x, ...) {
|
||||||
# TODO: group/color by sensor_id
|
oldpar = par()
|
||||||
plot(value~createdAt, x, col = x$sensorId, ...)
|
par(mar = c(2,4,1,1))
|
||||||
|
plot(value~createdAt, x, col = x$sensorId, xlab = NA, ylab = x$unit[1], ...)
|
||||||
|
par(mar = oldpar$mar)
|
||||||
invisible(x)
|
invisible(x)
|
||||||
}
|
}
|
||||||
|
Loading…
Reference in New Issue