data-raw/make-penguinsi.R

library(palmerpenguins)
library(usethis)
library(missForest)

# Base
penguinsi <- penguins
penguinsi <- as_tibble(missForest(as.data.frame(penguinsi))$ximp)

# Tidy version (for reference)
#library(dplyr)
#penguinsi <- penguins %>%
#  as.data.frame() %>%
#  missForest() %>%
#  `$`(ximp) %>%
#  as_tibble()

use_data(penguinsi)
nixgank-wang/bis557 documentation built on Dec. 26, 2020, 9:54 p.m.