1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
|
\name{plot-series}
\alias{seriesPlot}
\alias{assetsReturnPlot}
\alias{assetsCumulatedPlot}
\alias{assetsSeriesPlot}
\title{Displays Series Plots of Assets.}
\description{
Displays series from sets of assets.
}
\usage{
assetsReturnPlot(x, col = "steelblue", \dots)
assetsCumulatedPlot(x, col = "steelblue", \dots)
assetsSeriesPlot(x, col = "steelblue", \dots)
}
\arguments{
\item{x}{
an object of class \code{timeSeries}.
}
\item{col}{
a character string, defining the color to fill the boxes.
}
\item{\dots}{
optional arguments to be passed.
}
}
\author{
Diethelm Wuertz for the Rmetrics port.
}
\references{
Wuertz, D., Chalabi, Y., Chen W., Ellis A. (2009);
\emph{Portfolio Optimization with R/Rmetrics},
Rmetrics eBook, Rmetrics Association and Finance Online, Zurich.
}
\examples{
## LPP2005REC -
# Load Swiss Pension Fund Data:
LPP <- LPP2005REC
head(LPP)
## assetsReturnPlot -
# Create Return Series Plot:
# par(mfrow = c(3, 2))
assetsReturnPlot(LPP[, 1:3])
## assetsCumulatedPlot -
# Create Cumulated Price/Index Plot:
assetsCumulatedPlot(LPP[, "LPP40"], col = "red")
## assetsSeriesPlot
# Crete Time Series Plot:
assetsSeriesPlot(LPP[, c("LMI", "ALT")],
col = c("orange", "brown"))
}
\keyword{models}
|
