tidywater (version 0.7.0)

solvecost_power: Determine power cost

Description

This function takes kW,

Usage

solvecost_power(power, utilization = 100, cost, time = "day")

Value

A numeric value for power, $/time.

Arguments

power

Power consumed in kW

utilization

Amount of time equipment is running in percent. Defaults to continuous.

cost

Power cost in $/kWhr

time

Desired output units, one of c("day", "month", "year"). Defaults to "day".

Examples

powercost <- solvecost_power(50, 100, .08)

library(dplyr)
cost_data <- tibble(
  power = seq(10, 50, 10),
  utilization = 80
) %>%
  mutate(costs = solvecost_power(power = power, utilization = utilization, cost = .08))