data-raw/speed_gro.R

## Creates speed-gro proportions which determine changes to growth
## TODO: Update with sourced game code or data files instead
## of manual entry

speed_gro <-
  data.frame(soil_mod = c("Speed-Gro",
                          "Deluxe Speed-Gro",
                          "Hyper Speed-Gro",
                          "Normal",
                          "Basic Fertilizer",
                          "Basic Retaining Soil",
                          "Deluxe Fertilizer",
                          "Deluxe Retaining Soil",
                          "Quality Fertilizer",
                          "Quality Retaining Soil"),
             effect = c(0.9,
                        0.75,
                        0.66,
                        rep(1, 7)))
usethis::use_data(speed_gro, overwrite = TRUE)
aftonsteps/croptimizer documentation built on Jan. 28, 2021, 12:50 p.m.