andreas/FreesearchR
1
0
Fork 0
mirror of https://github.com/agdamsbo/FreesearchR.git synced 2026-06-19 12:37:30 +02:00
Code Issues Projects Releases Packages Wiki Activity

regression improvements

Browse source
This commit is contained in:
Andreas Gammelgaard Damsbo 2025-01-17 15:59:24 +01:00
commit 2dbc78310e
No known key found for this signature in database
10 changed files with 2619 additions and 454 deletions
Download patch file Download diff file Expand all files Collapse all files

23
inst/apps/data_analysis_modules/www/report.qmd
View file

@ -17,8 +17,6 @@ web_data <- readr::read_rds(file = params$data.file)
library(gtsummary)
library(gt)
library(flextable)
library(easystats)
library(patchwork)
# library(webResearch)
```
@ -42,33 +40,16 @@ web_data$table1 |>
flextable::set_table_properties(width = 1, layout = "autofit")
```
Here are the regression results.
Here are the results from the `r web_data$regression$Multivariable$options$descr`.
```{r}
#| label: tbl-regression
#| tbl-cap: Regression analysis results
web_data$table2|>
web_data$regression$Table|>
gtsummary::as_flex_table() |>
flextable::set_table_properties(width = 1, layout = "autofit")
```
## Discussion
Good luck on your further work!
## Sensitivity
Here are the results from testing the regression model:
```{r}
#| label: tbl-checks
#| fig-cap: Regression analysis checks
#| fig-height: 8
#| fig-width: 6
#| fig-dpi: 600
plot(web_data$check)
```