R/cooper_jacob_utilities.R
cooper_jacob_calculate_parameters.RdFunction to calculate the transmissivity, storage coefficient and radius of influence using the Cooper-Jacob solution
cooper_jacob_calculate_parameters(ptest, par, hydraulic = TRUE)
| ptest | A pumping_test object |
|---|---|
| par | list with the value of a (slope) and t0 (Intercept) of the straight line fitted to the drawdown data |
| hydraulic | Logical flag to indicate if hydraulic parameters are calculated. If False, the the statistcal parameter are calculated. |
A list with the transmissivity, storage coefficient and radious of influence
Cooper, H. & Jacob, C. A generalized graphical method for evaluating formation constants and summarizing well field history. Transactions of the American Geophysical Union, 1946, 27, 526-534
Other cooper_jacob functions: cooper_jacob_solution_dlogt,
cooper_jacob_solution_initial,
cooper_jacob_solution,
cooper_jacob_well_function
data(theis) ptest <- pumping_test("Well1", Q= 1.3e-3, r = 200, t = theis$t, s = theis$s) cooper_jacob_sol0 <- cooper_jacob_solution_initial(ptest) par <- cooper_jacob_calculate_parameters(ptest, cooper_jacob_sol0) print(par)#> $Tr #> [1] 0.0001551938 #> #> $Ss #> [1] 2.135516e-06 #> #> $radius_influence #> [1] 2953.088 #>