Function to calculate the drawdown in time or space from a set of parameters determined using
the fit function.
evaluate(ptest, model, test.time = TRUE, n = 50)
| ptest | A pumping_test object |
|---|---|
| model | Character string specifying the model used to calculate the drawdown |
| test.time | A logical flag indicating if the evaluation of the pumping test data needs to be calculated at the drawdown times |
| n | Number of points used to calculate the drawdown if test.time = FALSE |
A list with the entries
t: Vector with the time
s: Vector with the calculated drawdown
dsdlnt: Vector with the derivative of drawdown with respect to the log of time
Other base functions: additional.parameters<-,
confint.pumping_test,
confint_bootstrap,
confint_jackniffe,
confint_wald, estimated<-,
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, simulate,
summary.pumping_test
data(theis) ptest <- pumping_test("Well1", Q = 1.3e-3, r = 200, t = theis$t, s = theis$s) ptest.fit <- fit(ptest, "theis") hydraulic.parameters(ptest) <- ptest.fit$hydraulic_parameters fit.parameters(ptest) <- ptest.fit$parameters model(ptest) <- "theis" estimated(ptest) <- TRUE res <- evaluate(ptest, "theis")