zhuang3: R optimization of a three-parameter van Genuchten particle...

In gowusu/vadose: The estimation of saturated hydraulic conductivity and soil water retention Curves in the vadose zone

Description

The function optimises 3-parameter van Genuchten particle size distribution function of Zhuang et al(2001).

Usage

zhuang3(data = NULL, D = NULL, fr = NULL, a = 0.5, b = 0.5,
  dmin = 0.001, p = NULL, group = NULL)

## Default S3 method:
zhuang3(data = NULL, D = NULL, fr = NULL, a = 0.5,
  b = 0.5, dmin = 0.001, p = NULL, group = NULL)

## S3 method for class 'zhuang3'
plot(x, main = "Particle Size Distribution Function",
  xlab = "Particle Diameter", ylab = "Fraction", ...)

## S3 method for class 'zhuang3'
coef(object, ...)

## S3 method for class 'zhuang3'
predict(object, D, ...)

Arguments

data	a dataframe of Particle Size Distribution. It can have column names of diameter of the particles "D" [mm], and fraction of the particles "fr" that ranges from 0-1.
D	character. The corresponding diameter in the data.
fr	character. The corresponding fraction of the particles.
a	an initial value of 'a' parameter to be optimised
b	an initial value of 'b' parameter to be optimised
dmin	an initial value of 'dmin' parameter to be optimised
p	porosity[g/m^3]
group	character. The name of the group variables if the data is from different areas.
x	a return object of the function.
main	Title of the plot
xlab	x label of the plot
ylab	y label of the plot
...	Any other graphical parameter
object	Model output object

Value

• PD: predicted fraction by mass of particles passing a particular diameter

• sand: percentage of sand

• clay: percentage of clay

• silt: percentage of silt

• a: optimised a parameter

• b: optimised b parameter

• dmin: optimised dmin parameter

Author(s)

George Owusu

References

Zhuang, J., Jin, Y., & Miyazaki, T. (2001). Estimating water retention characteristic from soil particle-size distribution using a non-similar media concept. Soil Sci., 166, 308-321.

See Also

zhuang4, haverkamp,lass3,logarithmic, logistic2, logistic3,logistic4,fredlund3, fredlund4, jaky,andersson,gompertz

Other van-Genuchten functions: haverkamp, zhuang4

Examples

data=read.csv(system.file("ext","sys","soil2.csv",package="vadose"))
single<- subset(data, ID=="30B20_1")
mod=zhuang3 (data=single,p="sand",D="D",fr="Sand.")
plot(mod)
## Not run: 
#group simulation
mod2=zhuang3 (data=data,D="D",fr="FractionSand",group="ID")
mod2$coef

## End(Not run)

gowusu/vadose documentation built on May 17, 2019, 7:59 a.m.