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)
#library(magrittr)
#penguinsi <- penguins%>%
#  as.data.frame()%>%
#  missForest()%>%
#  `$`(ximp)%>%
#  as_tibble()

use_data(penguinsi)
xy272/bis557 documentation built on Sept. 18, 2020, 12:57 p.m.