R/general_radial_flow_utilities.R
general_radial_flow_calculate_parameters.RdCalculates the hydraulic parameters form general_radial_flow model
general_radial_flow_calculate_parameters(ptest, par, hydraulic = TRUE)
| ptest | A pumping_test object |
|---|---|
| par | A list with the slope and intercept (a and t0) 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 parameter (a and t0) are calculated. |
A list with
Tr: Transmissivity
Ss: Storage coefficient
Barker, J. A. A generalized radial flow model for hydraulic tests in fractured rock Water Resources Research, 1988, 24, 1796-1804.
Other general_radial_flow functions: general_radial_flow_WF_LT,
general_radial_flow_solution_dlogt,
general_radial_flow_solution_initial,
general_radial_flow_solution,
general_radial_flow_well_function
data("general_radial_flow1") ptest.grf1 <- pumping_test("Well1", Q= 0.02322, r = 26.2, t = general_radial_flow1$t, s = general_radial_flow1$s) par <- list(rw = 0.1, rc = 0.1, rd = 1) ptest.grf1$additional_parameters <- par sol0 <- general_radial_flow_solution_initial(ptest.grf1) grf1.par <- general_radial_flow_calculate_parameters(ptest.grf1, sol0) print(grf1.par)#> $Tr #> [1] 0.005315041 #> #> $Ss #> [1] 0.0001559432 #> #> $n #> [1] 2 #>