Description Usage Arguments Value Author(s) References See Also Examples
View source: R/papadopulos_cooper_utilities.R
This function calcultes the derivative of the drawdown with respect to the log of time for Papadopulos-Cooper solution
1 | papadopulos_cooper_solution_dlogt(ptest, a, t0, t)
|
ptest |
A pumping_test object |
a |
Slope of the straight line fitted to the drawdown data using the Cooper-Jacob approach |
t0 |
Intercept of the straight line fitted to the drawdown data using the Cooper-Jacob approach |
t |
Numeric vector with time |
A list with the x and y coordinates of the derivative
Oscar Garcia-Cabrejo khaors@gmail.com
Papadopulos, I. S. & Cooper, H. H. Drawdown in a well of large diameter. Water Resources Research, 1967, 3, 241-244.
Other papadopulos_cooper functions: papadopulos_cooper_F_WF_LT_dlogt
,
papadopulos_cooper_F_WF_LT
,
papadopulos_cooper_calculate_parameters
,
papadopulos_cooper_solution_initial
,
papadopulos_cooper_solution
,
papadopulos_cooper_well_function
1 2 3 4 5 6 7 | data(papadopulos_cooper)
ptest <- pumping_test("Well1", Q=0.0050472, r = 3.048, t = as.numeric(papadopulos_cooper$t),
s = papadopulos_cooper$s)
ptest$additional_parameters <- list(rw = 0.6096, rc = 0.6096)
sol0 <- papadopulos_cooper_solution_initial(ptest)
sol_dlogt <- papadopulos_cooper_solution_dlogt(ptest, sol0$a, sol0$t0, ptest$t)
print(sol_dlogt)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.