Welcome to my utility package. This is a collection of “random” functions I have created
I use these functions at the command-line or store them in a single file (utilities.R) within other packages.
My current favorite:
library(seasmith)
# - Show the user workspace as a plot and data frame with seasmith::ls.summary().
ls.summary()## # A tibble: 7 × 6
## Type Count Size_All Size_Avg Rows Columns
## <fctr> <int> <dbl> <dbl> <dbl> <dbl>
## 1 tbl_df 7 31.872 4.5531429 248 32
## 2 function 2 9.768 4.8840000 NA NA
## 3 data.frame 4 4.296 1.0740000 26 1
## 4 Date 1 3.168 3.1680000 365 NA
## 5 character 3 1.696 0.5653333 28 NA
## 6 numeric 2 0.888 0.4440000 101 NA
## 7 list 2 0.080 0.0400000 0 NA
library(tidyverse)
# Fill-in these implicit missing month-year values...
dread## # A tibble: 11 × 2
## mon_year n
## <fctr> <int>
## 1 11/2015 5
## 2 12/2015 7
## 3 1/2016 1
## 4 2/2016 2
## 5 4/2016 1
## 6 8/2016 2
## 7 9/2016 3
## 8 10/2016 7
## 9 11/2016 6
## 10 12/2016 6
## 11 1/2017 16# ...by using seasmith::seq_fill_date_df()
dread %>%
seasmith::seq_fill_date_df("mon_year")## # A tibble: 15 × 2
## mon_year n
## <fctr> <int>
## 1 11/2015 5
## 2 12/2015 7
## 3 1/2016 1
## 4 2/2016 2
## 5 3/2016 NA
## 6 4/2016 1
## 7 5/2016 NA
## 8 6/2016 NA
## 9 7/2016 NA
## 10 8/2016 2
## 11 9/2016 3
## 12 10/2016 7
## 13 11/2016 6
## 14 12/2016 6
## 15 1/2017 16