Function to generate a drawdown curve using a given model with given hydraulic parameters and noise

simulate(model, Q, r, t, par, add.par = NULL, sigma = 0.01,
  seed = 12345)

Arguments

model

Model used to generate the drawdown curve

Q

Pumping rate in m3/s

r

Distance from pumping well to observation well in m

t

Numeric vector with the values of time to simulate the drawdown

par

List with parameters of the model (Transmissivity, Storage Coefficient, etc)

add.par

List with the additional parameter required to define the pumping_test object

sigma

Standard deviation of the noise added to the simulated drawdown.

seed

Seed for the random number generator

Value

A pumping_test object with the simulated drawdown

See also

Other base functions: additional.parameters<-, confint.pumping_test, confint_bootstrap, confint_jackniffe, confint_wald, estimated<-, evaluate, fit.optimization, fit.parameters<-, fit.sampling, fit, hydraulic.parameter.names<-, hydraulic.parameters<-, model.parameters, model<-, plot.pumping_test, plot_model_diagnostic, plot_sample_influence, plot_uncert, print.pumping_test, pumping_test, summary.pumping_test

Examples

par <- list(Tr = 1.4e-3, Ss = 2.1e-5) t <- logseq(2, 5, 50) ptest.sim <- simulate('theis', Q = 1.388e-2, r =250, t = t, par)