opensensmapR/tools/monitr/analyz.R

# create a working copy, so we cant accidentally loose all data
ts = osem_counts_ts

# compute our own measurements per minute, to check against the provided computation
ts$measurement_diff = c(diff(ts$measurements), 0)
ts$measurement_minute = ts$measurement_diff / c(as.numeric(diff(ts$time), unit = 'mins'), 0)

plot(measurements~time, ts)
plot(measurements_per_minute~time, ts)
add monitor docker container 2017-08-13 16:11:02 +02:00			`# create a working copy, so we cant accidentally loose all data`
			`ts = osem_counts_ts`

			`# compute our own measurements per minute, to check against the provided computation`
			`ts$measurement_diff = c(diff(ts$measurements), 0)`
			`ts$measurement_minute = ts$measurement_diff / c(as.numeric(diff(ts$time), unit = 'mins'), 0)`
add aggregated boxes metadata to monitor 2017-08-14 20:02:04 +02:00
			`plot(measurements~time, ts)`
			`plot(measurements_per_minute~time, ts)`