Function to assign the model for estimation to a pumping_test object
model(x) <- value
| x | A pumping_test object |
|---|---|
| value | Character sting wit the model used in the intepretation |
The pumping_test object with the model assigned
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,
plot.pumping_test,
plot_model_diagnostic,
plot_sample_influence,
plot_uncert,
print.pumping_test,
pumping_test, simulate,
summary.pumping_test
data(theis) ptest.theis <- pumping_test('Well1', Q = 1.38e-2, r = 250, t = theis$t, s = theis$s) ptest.theis.fit <- fit(ptest.theis, 'theis') hydraulic.parameters(ptest.theis) <- ptest.theis.fit$hydraulic_parameters model(ptest.theis) <- 'theis'