papadopulos_cooper_calculate_parameters: papadopulos_cooper_calculate_parameters

In khaors/pumpingtest: R Package for the analysis and evaluation of pumping tests

papadopulos_cooper_calculate_parameters

Description

Function to calculate the hydraulic parameters of the Papadopulos-Cooper solution

Usage

papadopulos_cooper_calculate_parameters(ptest, par, hydraulic = TRUE)

Arguments

ptest	A pumping test object
par	A list with the values of a (slope) and t0 (Intercept) of the straight line fitted to the drawdown data using the Cooper-Jacob approach.
hydraulic	Logical flag to indicate if hydraulic parameters are calculated. If False, the the statistcal parameters (a and t0) are calculated.

Value

A list with the hydraulic parameters:

• Tr: Transmissivity

• Ss: Storage coefficient

• cd: Wellbore Storage

• rho: Dimensionless radius

Author(s)

Oscar Garcia-Cabrejo [e-mail]

References

Papadopulos, I. S. & Cooper, H. H. Drawdown in a well of large diameter. Water Resources Research, 1967, 3, 241-244.

See Also

Other papadopulos_cooper functions: papadopulos_cooper_F_WF_LT_dlogt, papadopulos_cooper_F_WF_LT, papadopulos_cooper_solution_dlogt, papadopulos_cooper_solution_initial, papadopulos_cooper_solution, papadopulos_cooper_well_function

Examples

data(papadopulos_cooper)
ptest <- pumping_test("Well1", Q=0.0050472, r = 3.048, t = as.numeric(papadopulos_cooper$t),
                      s = papadopulos_cooper$s)
par <- list(rw = 0.6096, rc = 0.6096 )
ptest$additional_parameters <- par
sol0 <- papadopulos_cooper_solution_initial(ptest)
pc.par <- papadopulos_cooper_calculate_parameters(ptest, sol0)
print(pc.par)

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