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
96
97
98
99
100
101
102
103
|
\name{utils-binning2}
\alias{utils-binning2}
\alias{squareBinning}
\alias{hexBinning}
\alias{plot.squareBinning}
\alias{plot.hexBinning}
\title{Square and Hexagonal Data Binning}
\description{
Two functions which allow to create histograms due to sqaure
and hexagonal binning.
}
\usage{
squareBinning(x, y = NULL, bins = 30)
hexBinning(x, y = NULL, bins = 30)
\method{plot}{squareBinning}(x, col = heat.colors(12), addPoints = TRUE,
addRug = TRUE, \dots)
\method{plot}{hexBinning}(x, col = heat.colors(12), addPoints = TRUE,
addRug = TRUE, \dots)
}
\arguments{
\item{addPoints}{
a logical flag, should the center of mass points added to the
plot?
}
\item{addRug}{
a logical flag, should a rug representation be added to the
plot, for details see the function \code{rug}.
}
\item{bins}{
an integer specifying the number of bins.
}
\item{col}{
color map like for the \code{image} function.
}
\item{x, y}{
[squareBinning][hexBinning] - \cr
either two numeric vectors of equal length or if \code{y}
is NULL, a list with entries \code{x}, \code{y},
or named data frame with \code{x} in the first and
\code{y} in the second column.
Note, \code{timeSeries} objects are also allowed as input.\cr
[plot] - \cr
an object of class \code{squareBinning} or \code{hexBinning}.
}
\item{\dots}{
arguments to be passed.
}
}
\value{
A list with three entries, \code{x}, \code{y} and \code{z},
specified by an oject of class \code{squareBinning} or
\code{hexBinning}.
Note, the returned value, can be directly used by the \code{persp()}
and \code{contour} 3D plotting functions.
}
\details{
\code{squareBinning} does a square binning of data points, and
\code{hexBinning} does a hexagonal binning of data points.
}
\author{
Diethelm Wuertz for the Rmetrics \R-port.
}
\examples{
## squareBinning -
sB <- squareBinning(x = rnorm(1000), y = rnorm(1000))
plot(sB)
## hexBinning -
hB <- hexBinning(x = rnorm(1000), y = rnorm(1000))
plot(hB)
}
\keyword{programming}
|
