diff --git a/vignettes/02-tutorial.Rmd b/vignettes/02-tutorial.Rmd index b81f070e4693cafb704366a1a593c698d0a8b3e4..a01de3f7786036f8b9e3eb24c5a24305c03dac65 100644 --- a/vignettes/02-tutorial.Rmd +++ b/vignettes/02-tutorial.Rmd @@ -193,12 +193,12 @@ The area under the ROC curve (AUC) provides a single metric that summarizes the ```{r perf_mimic_pub2, eval=FALSE} ## -- actual/estimate comparison -resSimu$performances$byparams[3, c('description', 'R2', 'RMSE')] +resSimu$performances$byparams[3, c('description','R2','RMSE')] ``` ```{r perf_mimic_pub2_display, echo=FALSE, fig.align='center', fig.height=4, fig.width=7, message=FALSE, ,warning=FALSE} ## -- actual/estimate comparison -dt2display <- resSimu$performances$byparams[3, c('R2', 'RMSE')] +dt2display <- resSimu$performances$byparams[3, c('description','R2','RMSE')] kableExtra::kable(dt2display, row.names = FALSE ) %>% kableExtra::kable_styling(full_width = F, position = "center") @@ -417,7 +417,7 @@ resSimu$performances$byparams[3:4, c('description', 'R2', 'RMSE')] ```{r perf_mainX2_display, echo=FALSE, fig.align='center', fig.height=4, fig.width=7, message=FALSE, ,warning=FALSE} ## -- actual/estimate comparison -dt2display <- resSimu$performances$byparams[3:4, c('R2', 'RMSE')] +dt2display <- resSimu$performances$byparams[3:4, c('description', 'R2', 'RMSE')] rownames(dt2display) <- NULL kableExtra::kable(dt2display, row.names = FALSE) %>% kableExtra::kable_styling(full_width = F, position = "center")