R/jacob_lohman_utilities.R
jacob_lohman_G_calculate_parameters.Rd
Function to calculate the hydraulic parameters for the Jacob-Lohman solution (Discharge)
jacob_lohman_G_calculate_parameters(ptest, par)
ptest | A pumping_test object |
---|---|
par | A list with the slope and the intercept (a and t0) of the straight line fitted to the drawdown data using the Cooper-Jacob approach |
A list with
Tr Transmissivity
Ss Storage coefficient
radius_influence
Jacob, C. E. & Lohman, S. W. Nonsteady Flow to a Well Of Constant Drawdown. American Geophysical Union, 1952, 33, 10.
Other jacob_lohman functions: jacob_lohman_F_calculate_parameters
,
jacob_lohman_F_solution_initial
,
jacob_lohman_F_solution
,
jacob_lohman_F_well_function
,
jacob_lohman_G_WF_LT
,
jacob_lohman_G_solution_initial
,
jacob_lohman_G_solution
,
jacob_lohman_G_well_function
,
jacob_lohman_WF_F_LT
data(jacob_lohman) s <- vector("numeric", length(jacob_lohman$t)) s[1:length(jacob_lohman$t)] <- 0 ptest <- pumping_test("Well1", Q = jacob_lohman$q, r = 0.0, t = jacob_lohman$t, s = s)#> Warning: the condition has length > 1 and only the first element will be usedsol0 <- jacob_lohman_G_solution_initial(ptest) jl.par <- jacob_lohman_G_calculate_parameters(ptest, sol0) print(jl.par)#> $Tr #> [1] 1.899174e-07 #> #> $Ss #> [1] Inf #> #> $radius_influence #> [1] 0 #>