R/script/Script_GroundWaterFlow.R

source('/gpfs/home/lzs157/work/PIHM/PIHM.AnalysisR/R/script/waterbalance.R')

qgp=Ycfsub/YcP * 100;

r=colMeans(qgp)

qi= PIHMOUT$infil[t];
xqi=colSums(qi)
PIHM.3Dtriplot(data=xqi)

qr= PIHMOUT$Rech[t];
xqr=colSums(qr)
PIHM.3Dtriplot(data=xqr)
happynotes/PIHM.AnalysisR documentation built on June 20, 2019, 4:04 p.m.