if (FALSE) {
# Working examples (see arguments for further analysis options):
# Compute an annual frequency analysis using default arguments
results <- compute_annual_frequencies(station_number = "08NM116",
start_year = 1980,
end_year = 2010)
# Compute an annual frequency analysis using default arguments (as listed)
results <- compute_annual_frequencies(station_number = "08NM116",
roll_days = c(1,3,7,30),
start_year = 1980,
end_year = 2010,
prob_plot_position = "weibull",
prob_scale_points = c(.9999, .999, .99, .9, .5,
.2, .1, .02, .01, .001, .0001),
fit_distr = "PIII",
fit_distr_method = "MOM")
# Compute a 7-day annual frequency analysis with "median" plotting positions
# and fitting the data to a weibull distribution (not default PIII)
results <- compute_annual_frequencies(station_number = "08NM116",
roll_days = 7,
start_year = 1980,
end_year = 2010,
prob_plot_position = "median",
fit_distr = "weibull")
}
Run the code above in your browser using DataLab