diff options
Diffstat (limited to 'g5k/logs/analysis.org')
| -rw-r--r-- | g5k/logs/analysis.org | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/g5k/logs/analysis.org b/g5k/logs/analysis.org index 39e7885..457625f 100644 --- a/g5k/logs/analysis.org +++ b/g5k/logs/analysis.org @@ -5,17 +5,17 @@ * Logs Analysis ** R Scripts *** Generate all plots script - #+BEGIN_SRC R :results graphics :file second-try/plot.png :noweb yes + #+BEGIN_SRC R :results graphics :file third-try/plot.png :noweb yes <<RUtils>> - data=loadData("./second-try/data.csv") + data=loadData("./third-try/data.csv") - data=data%>%filter(simKey=="nbSensors")%>%filter(nbSensors==20) - ggplot(data,aes(x=time,y=energy))+geom_point(position="jitter")+xlab(getLabel("time"))+expand_limits(y=0)#+geom_hline(aes(group=nbSensors,color=nbSensors,yintercept=mean(energy))) - ggsave("./second-try/plot.png",dpi=80) + data=data%>%filter(simKey=="nbSensors") %>% filter(nbSensors==200) + ggplot(data,aes(x=time,y=energy,color=nbSensors))+geom_point(position="jitter")+xlab(getLabel("time"))+expand_limits(y=0)#+geom_hline(aes(group=nbSensors,color=nbSensors,yintercept=mean(energy))) + ggsave("./third-try/plot.png",dpi=180) #+END_SRC #+RESULTS: - [[file:second-try/plot.png]] + [[file:third-try/plot.png]] *** R Utils @@ -41,7 +41,7 @@ return(labels[varName]) } #+END_SRC - + ** Plots -> PDF Merge all plots in plots/ folder into a pdf file. #+NAME: plotToPDF @@ -89,7 +89,7 @@ #+BEGIN_SRC sh #!/bin/bash - whichLog="second-try" + whichLog="third-try" logFile="$(dirname $(readlink -f $0))"/$whichLog/simLogs.txt |