In janusvm/tidybudget:

library(dplyr)
library(tidybudget)

mybudget <- budget() %>% 
  add_income("su", 5300, "grants", "Janus") %>% 
  add_income("neas", 3500, "salary", "Janus") %>% 
  add_expense("rent", 3700, "housing", "Janus") %>% 
  add_expense("food", 1500, "groceries", "Janus")

mybudget

janusvm/tidybudget documentation built on May 18, 2019, 2:39 p.m.