Function to calculate the hydraulic parameters of a cooper solution for a slug test
cooper_calculate_parameters(ptest, par, hydraulic = TRUE)
| ptest | A pumping_test object |
|---|---|
| par | A list with the dimensionless wellbore storage coefficient (cd) and the Intercept of the straight line fitted to the drawdown data using the Cooper-Jacob approach (t0) |
| hydraulic | Logical flag to indicate if hydraulic parameters are calculated. If False, the the statistcal parameter are calculated. |
A list with
Tr: Transmisivity
Ss: Storage coefficient
radius_influence: radius of influence
Cooper, H. H.; Bredehoeft, J. D. & Papadopulos, I. S. Response of a finite-diameter well to an instantaneous charge of water Water Resources Research, 1967, 3, 263-269
Other cooper functions: cooper_WF_LT,
cooper_solution_dlogt,
cooper_solution_initial,
cooper_solution,
cooper_well_function
data(cooper_slug) ptest <- pumping_test("Well1", Q = 0, r = 0, t = cooper_slug$t, s = cooper_slug$s) par <- list(rw = 0.071, rc = 0.025) ptest$additional_parameters <- par sol0 <- cooper_solution_initial(ptest) hydr.par <- cooper_calculate_parameters(ptest,sol0) print(hydr.par)#> $Tr #> [1] 1.222278e-08 #> #> $Ss #> [1] 0.002061508 #> #> $radius_influence #> [1] 3.203813 #>