diff --git a/cloture.Rmd b/cloture.Rmd
index 693f2ef..bc83ce1 100644
--- a/cloture.Rmd
+++ b/cloture.Rmd
@@ -4,7 +4,6 @@ output:
   html_document:
     toc: true
     toc_float: true
-    self_contained: false
 ---
 
 ```{r init, echo = F, message = F}
@@ -721,10 +720,10 @@ if (nrow(Ovalide$EDMS) == 6)
   IP_previous <- OvalideP$EDMS[[1, 2]] / OvalideP$EDMS[[2, 2]]
 }
 
-data_frame(IP_current, IP_previous) %>%
+data_frame(IP_previous, IP_current) %>%
   datatable(rownames = "Indice de performance",
             extensions = "Buttons",
-            colnames = c(current, previous)) %>%
+            colnames = c(previous, current)) %>%
   formatCurrency(1:2, currency = "", digits = 3, dec.mark = ",")
 
 rm(IP_previous, IP_current)