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
|
\name{plot-mst}
\alias{treePlot}
\alias{assetsTreePlot}
\title{Assets Tree Plot}
\description{
Creates and displays a minimum spanning tree of assets.
}
\usage{
assetsTreePlot(x, labels = TRUE, title = TRUE, box = TRUE,
method = "euclidian", seed = NULL, \dots)
}
\arguments{
\item{x}{
a multivariate \code{timeSeries} object.
}
\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{title}{
a logical flag, should a default title be added? By default
\code{TRUE}.
}
\item{box}{
a logical flag, should a box be added around the plot? By default
\code{TRUE}.
}
\item{method}{
a character string, the method used to compute the distance
matrix, see function \code{dist}.
}
\item{seed}{
an integer value setting the seed in the computation of the
sample ranks.
}
\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[, 1:6]
head(LPP)
## assetsTreePlot(LPP) -
# Create Minimum Spanning Tree Graph: assetsTreePlot -
# par(mfrow = c(2, 2))
assetsTreePlot(LPP)
# new seeds ...
for (i in 1:3) assetsTreePlot(LPP)
}
\keyword{models}
|
