specmine (version 4.0.0)

ica_kmeans_plot3D: ICA 3D k-means plot

Description

Creates an interactive three-dimensional ICA plot coloured by k-means clusters.

Usage

ica_kmeans_plot3D(
  dataset,
  ica.result,
  num.clusters = 3,
  dims = c(1, 2, 3),
  kmeans.result = NULL,
  use.embedding = TRUE,
  title = "ICA 3D K-means Plot"
)

Value

A plotly htmlwidget.

Arguments

dataset

Dataset to cluster.

ica.result

Result returned by ica_analysis_dataset().

num.clusters

Number of k-means clusters.

dims

Three independent components to plot.

kmeans.result

Optional k-means result containing a cluster vector.

use.embedding

Logical indicating whether k-means should be applied to the ICA embedding when kmeans.result is not supplied.

title

Plot title.

Examples

if (requireNamespace("fastICA", quietly = TRUE) &&
    requireNamespace("plotly", quietly = TRUE)) {
  datamat <- matrix(rnorm(240), nrow = 8)
  dataset <- list(
    data = datamat,
    metadata = data.frame(
      class = factor(rep(c("A", "B"), each = 15))
    )
  )

  ica.result <- ica_analysis_dataset(
    dataset,
    n_components = 3,
    maxit = 100,
    seed = 42
  )

  kmeans.result <- list(
    cluster = rep(1:2, each = 15)
  )

  ica_kmeans_plot3D(
    dataset,
    ica.result,
    num.clusters = 2,
    kmeans.result = kmeans.result
  )
}