Description
Kiernan Nicholls Miscellaneous.
Description
Quality of life functions for interactive programming. Shortcuts for common combinations of functions or different default arguments. Not to be used in production level scripts, but useful for exploring and quickly manipulating data for easy analysis. Also imports a variety of packages to facilitate the installation of those imported packages on the host machine.
README.md
k5 
The goal of ‘k5’ is to offer miscellaneous quality of life functions used by Kiernan Nicholls during interactive programming. They make things easier for me but are bad for scripts and packages.
Installation
You can install the release version of this package from CRAN:
install.packages("k5")
The development version can be installed from GitHub:
# install.packages("remotes")
remotes::install_github("k5cents/k5")
Example
library(k5)
packageVersion("k5")
#> [1] '0.2.0'
A list of frequently used packages can be loaded from a file.
load_my_packages()
#> ✔ load 19 packages from
#> '/home/kiernan/R/x86_64-pc-linux-gnu-library/4.1/k5/PACKAGES'
Some functions wrap common combos like mean(x %in% y) or sum(is.na(x)).
x <- c("VT", "NH", "ZZ", "ME", NA)
prop_in(x, state.abb)
#> [1] 0.75
count_na(x)
#> [1] 1
Some functions wrap functions from other packages with different defaults.
dplyr::count(mtcars, cyl)
#> cyl n
#> 1 4 11
#> 2 6 7
#> 3 8 14
# sort and add fraction
k5::count2(mtcars, cyl)
#> # A tibble: 3 × 3
#> cyl n p
#> <dbl> <int> <dbl>
#> 1 8 14 0.438
#> 2 4 11 0.344
#> 3 6 7 0.219
There are also some handy shortcuts for the .Last.value tool.
df <- tail(mtcars, 50)
write_last()
#> ℹ `.Last.value` has class 'data.frame'
#> ✓ Saved tab-separated file '/tmp/RtmpFTaCH6/file15127cc7851b.tsv' (1.25K)
vc <- sample(state.name, 1000, replace = TRUE)
write_last()
#> ℹ `.Last.value` has class 'character'
#> ✓ Saved line-separated file '/tmp/RtmpFTaCH6/file151235b67c89.txt' (9.19K)