diff options
| author | Loic Guegan <manzerberdes@gmx.com> | 2019-05-17 11:08:57 +0200 |
|---|---|---|
| committer | Loic Guegan <manzerberdes@gmx.com> | 2019-05-17 11:08:57 +0200 |
| commit | 7c9410246fc64f2638de7779b11070d95e7756e3 (patch) | |
| tree | 2cd99dbd0241bcf3209b3bf09b2f27ad64cc6af6 /g5k/logs/.Rhistory | |
| parent | 1ab4a6a97aab850aa496fccc8c26293c57561620 (diff) | |
Add analysis script
Diffstat (limited to 'g5k/logs/.Rhistory')
| -rw-r--r-- | g5k/logs/.Rhistory | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/g5k/logs/.Rhistory b/g5k/logs/.Rhistory new file mode 100644 index 0000000..9fc1647 --- /dev/null +++ b/g5k/logs/.Rhistory @@ -0,0 +1,25 @@ +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)) |