plot-methods {BCDating} | R Documentation |

## Plotting BCDating Objects, and Plotting Time-Series on BCDating Plot Background

### Description

Methods for function `plot`

. Some arguments are not applicable to all methods, but most are common.

### Arguments

`dates` |
If |

`yearrep` |
Number of digits a year is represented if dates are plotted (i.e. |

`col.bg` |
Background Color of Dating plot (i.e. the color for periods with unknown cycle state). |

`col.exp` |
Color for Expansions. |

`col.rec` |
Color for Recessions. |

`main` |
Main Title of the Plot, if not provided, the name of the Dating will be used. |

`xlab` |
Label of the X axis. |

`ylab` |
Label of the Y axis. |

`lwd` |
The line Width. |

`cex` |
Relative magnification factor. |

`vert` |
A vector of dates in which vertical lines should be plotted. |

`col.vert` |
Color of added vertical lines. |

`windos` |
If |

`averages` |
If |

`col` |
Color of each of the time series plotted. This can be either a vector with the length equal to number of time series in mts object, or just a single value, which would be used for all time series. |

### Methods

`signature(x = "BCDating", y = "missing")`

Plots a BCDating.

`signature(x = "BCDating", y = "ts")`

Plot a Time-Series, (or multiple time serires in case y's class is mts) on a BCDating.

`signature(x = "ts", y = "BCDating")`

Plot a Time-Series, (or multiple time serires in case y's class is mts) on a BCDating.

`signature(x = "BCDating", y = "BCDating")`

Plots 2 BCDatings, so you can compare them.

`signature(x = "list", y = "missing")`

Plots a list of BCDating Objects, so you can compare them.

### Author(s)

Majid Einian,m.einian@mbri.ac.ir,

Monetary and Banking Research Institute, Central Bank of Islamic Republic of Iran

Franck Arnaud ,

National Institute of Statistics and Economic Studies (INSEE), France

### Examples

```
library(BCDating)
data("MBRI.Iran.Dating")
plot(MBRI.Iran.Dating)
plot(MBRI.Iran.Dating,dates=TRUE)
data("Iran.non.Oil.GDP.Cycle")
plot(MBRI.Iran.Dating,Iran.non.Oil.GDP.Cycle)
plot(Iran.non.Oil.GDP.Cycle,MBRI.Iran.Dating)
data("Iran.non.Oil.GDP.Quarterly.Growth")
plot(MBRI.Iran.Dating,Iran.non.Oil.GDP.Quarterly.Growth,averages=TRUE)
plot(MBRI.Iran.Dating,cbind(Iran.non.Oil.GDP.Cycle*100,Iran.non.Oil.GDP.Quarterly.Growth))
dat <- BBQ(Iran.non.Oil.GDP.Cycle, name="Dating Business Cycles of Iran")
plot(dat,MBRI.Iran.Dating)
plot(list(dat,MBRI.Iran.Dating))
```

*BCDating*version 0.9.8 Index]