Function to calculate the derivative of the drawdown with respect to log of time of the Cooper-Jacob solution

cooper_jacob_solution_dlogt(ptest, a, t0, t)

Arguments

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 the time at which measurements were taken

Value

A numeric vector with the values of the derivative of drawdown with respect to log of time

References

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

See also

Examples

data(theis) ptest <- pumping_test("Well1", Q= 1.3e-3, r = 200, t = theis$t, s = theis$s) sol0 <- cooper_jacob_solution_initial(ptest) sol_dlogt <- cooper_jacob_solution_dlogt(ptest, sol0$a, sol0$t0, ptest$t) print(sol_dlogt)
#> [1] 0.6665904 0.6665904 0.6665904 0.6665904 0.6665904 0.6665904 0.6665904 #> [8] 0.6665904 0.6665904 0.6665904 0.6665904 0.6665904 0.6665904 0.6665904 #> [15] 0.6665904 0.6665904 0.6665904 0.6665904 0.6665904 0.6665904 0.6665904 #> [22] 0.6665904