Comments (1)
Default is to collapse the terms. This breaks existing functionality maybe but it's nice.
> #RMS with rcs()
> models3 = list(
+ rms::ols(Sepal.Width ~ Sepal.Length, data = iris),
+ rms::ols(Sepal.Width ~ Sepal.Length + Petal.Width, data = iris),
+ rms::ols(Sepal.Width ~ Sepal.Length + Petal.Width + Petal.Length, data = iris),
+ rms::ols(Sepal.Width ~ rms::rcs(Sepal.Length) + Petal.Width + Petal.Length, data = iris)
+ )
> models3 %>% summarize_models()
Predictor/Model 1 2 3 4
1 Intercept 3.42 (0.254***) 1.93 (0.321***) 1.04 (0.271***) 0.32 (1.045)
2 Sepal.Length -0.06 (0.043) 0.29 (0.066***) 0.61 (0.062***) (nonlinear)
3 Petal.Width <NA> -0.47 (0.072***) 0.56 (0.123***) 0.61 (0.128***)
4 Petal.Length <NA> <NA> -0.59 (0.062***) -0.60 (0.065***)
5 R2 adj. 0.007 0.224 0.514 0.514
6 N 150 150 150 150
> models3 %>% summarize_models(collapse_nonlinear = F)
# A tibble: 9 x 5
`Predictor/Model` `1` `2` `3` `4`
<chr> <chr> <chr> <chr> <chr>
1 Intercept 3.42 (0.254***) 1.93 (0.321***) 1.04 (0.271***) 0.32 (1.045)
2 Sepal.Length -0.06 (0.043) 0.29 (0.066***) 0.61 (0.062***) 0.76 (0.215***)
3 Petal.Width NA -0.47 (0.072***) 0.56 (0.123***) 0.61 (0.128***)
4 Petal.Length NA NA -0.59 (0.062***) -0.60 (0.065***)
5 Sepal.Length' NA NA NA -0.60 (1.556)
6 Sepal.Length'' NA NA NA 0.50 (4.538)
7 Sepal.Length''' NA NA NA 1.91 (5.290)
8 R2 adj. 0.007 0.224 0.514 0.514
9 N 150 150 150 150
from kirkegaard.
Related Issues (20)
- GG_group_means - make it possible to disable CI HOT 1
- miss_impute: preserve rownames
- GG_scatter: support for coloring of points
- MOD_summary: model assumption tests HOT 1
- browse_if() runs in the wrong environment
- GG_denhist(): y axis upper label sometimes missing when no_y_axis_values = T
- GG_group_means(): incorrect plotting when numeric used for groupvar
- add boxplot to GG_group_means HOT 1
- write_clipboard bug with `NA` in strings
- Add LICENSE? HOT 1
- Install fails on "Error: unable to load R code in package 'kirkegaard'" HOT 3
- summarize_models: Error: Assigned data `c("R2 adj.", get_adj_r2(x) %>% format_digits(3))` must be compatible with row subscript `nrow(y2) + 1`. HOT 1
- Censored data with GG_density()
- GG_heatmap(), legend on top of values HOT 1
- GG_save(): fails with ggtern plots now
- GG_heatmap(): fails with NAs in correlation matrix
- new_lines_adder() broken vectorization HOT 1
- GG_group_means() critical bug with wrong labels
- summarize_models() error
Recommend Projects
-
React
A declarative, efficient, and flexible JavaScript library for building user interfaces.
-
Vue.js
🖖 Vue.js is a progressive, incrementally-adoptable JavaScript framework for building UI on the web.
-
Typescript
TypeScript is a superset of JavaScript that compiles to clean JavaScript output.
-
TensorFlow
An Open Source Machine Learning Framework for Everyone
-
Django
The Web framework for perfectionists with deadlines.
-
Laravel
A PHP framework for web artisans
-
D3
Bring data to life with SVG, Canvas and HTML. 📊📈🎉
-
Recommend Topics
-
javascript
JavaScript (JS) is a lightweight interpreted programming language with first-class functions.
-
web
Some thing interesting about web. New door for the world.
-
server
A server is a program made to process requests and deliver data to clients.
-
Machine learning
Machine learning is a way of modeling and interpreting data that allows a piece of software to respond intelligently.
-
Visualization
Some thing interesting about visualization, use data art
-
Game
Some thing interesting about game, make everyone happy.
Recommend Org
-
Facebook
We are working to build community through open source technology. NB: members must have two-factor auth.
-
Microsoft
Open source projects and samples from Microsoft.
-
Google
Google ❤️ Open Source for everyone.
-
Alibaba
Alibaba Open Source for everyone
-
D3
Data-Driven Documents codes.
-
Tencent
China tencent open source team.
from kirkegaard.