anRpackage/R/rrp_full.R

rrp_full <-
function(rrp_incentive,params){
  
  f <- function(r) {r -zevgrantbands(r) -vrt_new_rebate(0.9*r,params)-rrp_incentive}
  
}
Phalacrocorax-gaimardi/phevmicrosimr documentation built on June 8, 2022, 3:27 p.m.