evaluate: evaluate

View source: R/pumpingtest.R

evaluateR Documentation

evaluate

Description

Function to calculate the drawdown in time or space from a set of parameters determined using the fit function.

Usage

evaluate(ptest, model, test.time = TRUE, n = 50)

Arguments

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

Value

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

Author(s)

Oscar Garcia-Cabrejo khaors@gmail.com

See Also

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

Examples

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")

khaors/pumpingtest documentation built on June 10, 2025, 4:53 a.m.