select_plot {ICSClust} | R Documentation |
Plot of the Generalized Kurtosis Values of the ICS Transformation
Description
Extracts the generalized kurtosis values of the components obtained via an
ICS transformation and draws either a screeplot or a specific plot for a
given criterion. If an object of class "ICS_crit"
is given, then the
selected components are shaded on the plot.
Usage
select_plot(object, ...)
## Default S3 method:
select_plot(
object,
select = NULL,
scale = FALSE,
screeplot = TRUE,
type = c("dots", "lines"),
width = 0.2,
color = "grey",
alpha = 0.3,
size = 3,
...
)
## S3 method for class 'data.frame'
select_plot(
object,
type = c("dots", "lines"),
width = 0.2,
color = "grey",
alpha = 0.3,
...
)
## S3 method for class 'ICS_crit'
select_plot(
object,
type = c("dots", "lines"),
width = 0.2,
color = "grey",
alpha = 0.3,
size = 3,
screeplot = TRUE,
...
)
Arguments
object |
an object inheriting from class |
... |
additional arguments are currently ignored. |
select |
an integer, character, or logical vector specifying for
which components to extract the generalized kurtosis values, or
|
scale |
a logical indicating whether to scale the generalized
kurtosis values to have product 1 (defaults to |
screeplot |
boolean. If |
type |
either |
width |
the width for shading the selected components in case an
|
color |
the color for shading the selected components in case an
|
alpha |
the transparency for shading the selected components in case
an |
size |
size of the points. Only relevant for "discriminatory" criteria. |
Value
An object of class "ggplot"
(see ggplot2::ggplot()
).
Author(s)
Andreas Alfons and Aurore Archimbaud
Examples
X <- iris[,-5]
out <- ICS(X)
# on an ICS object
select_plot(out)
select_plot(out, type = "lines")
# on an ICS_crit object
# median criterion
out_med <- med_crit(out, nb_select = 1, select_only = FALSE)
select_plot(out_med, type = "lines")
select_plot(out_med, screeplot = FALSE, type = "lines",
color = "lightblue")
# discriminatory criterion
out_disc <- discriminatory_crit(out, clusters = iris[,5],
select_only = FALSE)
select_plot(out_disc)