X-Git-Url: http://bilbo.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/f0446c8f827c76c8f59790b1ab87e66f3eb8c319..3f4f5e63dadc0023c0a02a08af8e9e9801b38e8e:/contrib/benchmarking_code_block/Rplot_hist.R

diff --git a/contrib/benchmarking_code_block/Rplot_hist.R b/contrib/benchmarking_code_block/Rplot_hist.R
index 18f5f23a0d..9c21927f96 100644
--- a/contrib/benchmarking_code_block/Rplot_hist.R
+++ b/contrib/benchmarking_code_block/Rplot_hist.R
@@ -40,14 +40,14 @@ i<-1
 
 # Reading histograms one by one, line by line
 while (length(oneLine <- readLines(fp, n = 1, warn = FALSE)) > 0){
-  myVector <- (strsplit(oneLine, "\t")) 
-  
+  myVector <- (strsplit(oneLine, "\t"))
+
   dfl <- ldply (myVector, data.frame)
 
   name<-as.character(dfl[1,])
   nbins<-as.numeric(as.character(dfl[4,]))
   allbreaks<-as.numeric(as.character(dfl[5:(5+nbins-1),]))
-  
+
   dh<-data.frame(Name=as.character(dfl[1,]), Total=as.numeric(as.character(dfl[2,])),
                  Mean=as.numeric(as.character(dfl[3,])), Nbins=as.numeric(as.character(dfl[4,])))
   dh<-cbind(dh,Bstart=allbreaks[-length(allbreaks)])