data(project)
tmp <- ev$new(start = project$start,
end = project$end,
progress = project$progress,
planned_cost = project$planned_cost,
project_value = 150000,
cost_to_date = 10000,
date = "2024-07-03")
plot(tmp)
Run the code above in your browser using DataLab