plot.CalGR.Rd 993 Bytes
Newer Older
unknown's avatar
unknown committed
1
2
3
4
5
6
7
\encoding{UTF-8}
\name{plot.CalGR}
\alias{plot.CalGR}
\title{Time series plotting GR objects}


\usage{
8
\method{plot}{CalGR}(x, which = c("perf", "hist", "time"), ...)
unknown's avatar
unknown committed
9
10
11
12
13
14
}


\arguments{
  \item{x}{[object of class \emph{CalGR}] see \code{\link{CalGR}} for details}
  
15
  \item{which}{[character] XXXX \code{"perf"}, \code{"hist"}, \code{"time"}}, 
unknown's avatar
unknown committed
16
  
unknown's avatar
unknown committed
17
  \item{...}{other parameters to be passed through to plotting functions}
unknown's avatar
unknown committed
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
}


\description{Time series plotting GR objects}


\seealso{
\code{\link{CalGR}}
}


\author{Olivier Delaigue}


\examples{
library(airGR)

## data.frame of observed data
data(L0123001)
BasinObs2 <- BasinObs[, c("DatesR", "P", "E", "Qmm", "T")]

## Preparation of observed data for modelling
40
w1 <- ObsGR(ObsBV = BasinObs2, TypeModel = "GR5J", CemaNeige = TRUE)
unknown's avatar
unknown committed
41
42
43
44

## Calibration step
w2 <- CalGR(ObsGR = w1, CalCrit = c("NSE", "KGE", "KGE2", "RMSE"),
            WupPer = NULL, CalPer = c("1990-01-01", "1993-12-31"))
45
46
47
plot(w2, "perf")
plot(w2, "time")
plot(w2, "hist")
unknown's avatar
unknown committed
48
49
}