mirror of
https://gitlab.com/manzerbredes/paper-lowrate-iot.git
synced 2025-04-19 04:09:43 +00:00
26 lines
1.4 KiB
Text
26 lines
1.4 KiB
Text
|
library("tidyverse")
|
||
|
|
read_csv("nbSensors_2048VMSIZE_100NBSENSORS_15580778521558078188.csv")
|
||
|
|
energy=read_csv("nbSensors_2048VMSIZE_100NBSENSORS_15580778521558078188.csv")
|
||
|
|
ggplot(energy, aes(x=ts,y=energy))+geom_line()
|
||
|
|
ggplot(energy, aes(x=ts,y=energy))+geom_point()
|
||
|
|
ggplot(energy, aes(x=ts,y=energy))+geom_line() + expand_limits(x=,y=)
|
||
|
|
ggplot(energy, aes(x=ts,y=energy))+geom_line() + expand_limits(x=0,y=0)
|
||
|
|
ggplot(energy, aes(x=ts,y=energy))+geom_line() + expand_limits(y=0)
|
||
|
|
ggplot(energy, aes(x=ts,y=energy))+geom_line() + expand_limits(y=0) + scale_x_datetime()
|
||
|
|
energy$ts
|
||
|
|
as.POSIXct(energy$ts)
|
||
|
|
as.POSIXct(energy$ts,origin="1970-01-01")
|
||
|
|
energy %>% mutate(ts=as.POSIXct(energy$ts,origin="1970-01-01"))
|
||
|
|
energy %>% mutate(ts=as.POSIXct(ts,origin="1970-01-01"))
|
||
|
|
energy=energy %>% mutate(ts=as.POSIXct(ts,origin="1970-01-01"))
|
||
|
|
ggplot(energy, aes(x=ts,y=energy))+geom_line() + expand_limits(y=0) + scale_x_datetime()
|
||
|
|
energy=read_csv("nbSensors_2048VMSIZE_100NBSENSORS_15580778521558078188.csv")
|
||
|
|
energy
|
||
|
|
energy=energy%>%mutate(ts=ts-min(ts))
|
||
|
|
energy
|
||
|
|
ggplot(energy, aes(x=ts,y=energy))+geom_line() + expand_limits(y=0)
|
||
|
|
ggplot(energy, aes(x=ts,y=energy))+geom_line() + expand_limits(y=0)+geom_jitter
|
||
|
|
ggplot(energy, aes(x=ts,y=energy))+geom_line() + expand_limits(y=0)+geom_jitter()
|
||
|
|
ggplot(energy, aes(x=ts,y=energy)) + expand_limits(y=0)+geom_jitter()
|
||
|
|
ggplot(energy, aes(x=ts,y=energy)) + expand_limits(y=0)+geom_jitter(position = position_jitter(width = 0.4))
|