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
82
83
84
85
86
87
88
89
90
91
92
93
94
95
|
\name{plot-risk}
\alias{seriesPlots}
\alias{assetsRiskReturnPlot}
\alias{assetsNIGShapeTrianglePlot}
\title{Assets Risk Plots}
\description{
Displays risk plot from asseets.
}
\usage{
assetsRiskReturnPlot(x, col = "steelblue", percentage = FALSE, scale = 252,
labels = TRUE, add = TRUE, \dots)
assetsNIGShapeTrianglePlot(x, labels, col = "steelblue", \dots)
}
\arguments{
\item{x}{
any rectangular time series object which can be converted by the
function \code{as.matrix()} into a matrix object, e.g. like an
object of class \code{timeSeries}, \code{data.frame}, or \code{mts}.
}
\item{col}{
a character string, defining the color to fill the boxes.
}
\item{percentage}{
a logical flag. Are the returns given by log or percentual log
returns?
}
\item{scale}{
an integer value, the scale, i..e number of days, in a year. Used
by daily data sets.
}
\item{labels}{
a logical flag, if \code{TRUE} then default labels will be used,
otherwise the plots will be displayed without labels and the user
can add his own labels.
}
\item{add}{
a logical flag, 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)
## assetsRiskReturnPlot -
# Create Risk/Return Plot:
# par(mfrow = c(2, 2))
assetsRiskReturnPlot(LPP)
## assetsNIGShapeTrianglePlot -
# Create NIG Shape Triangle Plot:
assetsNIGShapeTrianglePlot(LPP)
}
\keyword{models}
|
