Trailing semicolons are not needed (codefactor.io/lintr).

diff --git a/contrib/benchmarking_code_block/Rhist.R b/contrib/benchmarking_code_block/Rhist.R
index 917be30..cf642c4 100644 (file)
--- a/contrib/benchmarking_code_block/Rhist.R
+++ b/contrib/benchmarking_code_block/Rhist.R
@@ -20,7 +20,7 @@ merge_empty_bins <- function (h){
     for(i in 1:(length(h$counts)-1)){
       if(h$counts[i]!=0 || h$counts[i+1]!=0){
         counts2[j]<-h$counts[i]
-        breaks2[j+1]<-h$breaks[i+1];
+        breaks2[j+1]<-h$breaks[i+1]
         j<-j+1
       }
     }

diff --git a/docs/source/tuto_s4u/draw_gantt.R b/docs/source/tuto_s4u/draw_gantt.R
index f3ab44d..3e9afb7 100644 (file)
--- a/docs/source/tuto_s4u/draw_gantt.R
+++ b/docs/source/tuto_s4u/draw_gantt.R
@@ -5,13 +5,13 @@ library(pajengr)
 
 # Load and relabel the data
 df = pajeng_read(args[1])
-names(df$state) = c("Type", "Actor", "Container", "Start", "End", "Duration", "Level", "State");
+names(df$state) = c("Type", "Actor", "Container", "Start", "End", "Duration", "Level", "State")
 
 # Actually draw the graph
-p = ggplot(df$state) + geom_segment(aes(x=Start, xend=End, y=Actor, yend=Actor,color=State), size=5);
+p = ggplot(df$state) + geom_segment(aes(x=Start, xend=End, y=Actor, yend=Actor,color=State), size=5)
 
 # Cosmetics to compact the resulting graph
-p.height <- length(unique(df$state$Actor)) * 0.05 + 2;
+p.height <- length(unique(df$state$Actor)) * 0.05 + 2
 pdf(height = p.height)
 
 # Produce the pdf file