Ecosyste.ms: Awesome
An open API service indexing awesome lists of open source software.
https://github.com/MilesMcBain/noprobs
Tidy error data
https://github.com/MilesMcBain/noprobs
Last synced: 9 days ago
JSON representation
Tidy error data
- Host: GitHub
- URL: https://github.com/MilesMcBain/noprobs
- Owner: MilesMcBain
- License: other
- Created: 2019-06-06T02:21:06.000Z (over 5 years ago)
- Default Branch: master
- Last Pushed: 2019-06-06T03:43:03.000Z (over 5 years ago)
- Last Synced: 2024-11-30T20:52:49.511Z (13 days ago)
- Language: R
- Size: 3.91 KB
- Stars: 5
- Watchers: 2
- Forks: 0
- Open Issues: 0
-
Metadata Files:
- Readme: README.md
- License: LICENSE
Awesome Lists containing this project
- jimsghstars - MilesMcBain/noprobs - Tidy error data (R)
README
# noprobs
Errors, warnings, messages... it's all just data innit?
```r
library(titanic)
library(tidyverse)
library(noprobs)fitting_fn <- function(a_df){
glm(Survived ~ ., family = binomial, data = a_df)
}
model_frame <-
titanic_train %>%
group_by(Pclass) %>%
nest() %>%
mutate(result = map(data, ~no_problem(fitting_fn(.x)))) %>%
unnest(result)model_frame
## # A tibble: 3 x 6
## Pclass data .result .warnings .messages .errors
##
## 1 3
## 2 1
## 3 2any_problems(model_frame)
## [1] TRUEmodel_frame$.warnings
## [[1]]
## [1] "glm.fit: algorithm did not converge"## [[2]]
## [1] "glm.fit: algorithm did not converge"## [[3]]
## [1] "glm.fit: algorithm did not converge"
```