library(archeospec) # Set a seed value to ensure reproducibility set.seed(934587)
The package includes a small set of signatures called signatures
. Load the data
# Loading data data(signatures)
Fix the endmembers to a set of samples. Apply the clustering to group all the signatures to the selected endmembers.
signatures <- unmixing_fixed( signatures, endmember_files=c("signature0000.asd", "signature0001.asd", "signature0002.asd", "signature0003.asd", "signature0005.asd"), endmember_names=c("orange", "red", "black", "white", "base"), endmember_colors = c("darkorange2", "red2", "gray15", "white", "green4") ) signatures <- clustering_endmembers(signatures)
See information of VCA in tabular format
table_endmembers(signatures) table_residuals_summary(signatures) table_weights(signatures)
See information of VCA and K-Means as plots
plot_endmembers(signatures) plot_clusters(signatures) plot_mutualinfo(signatures) plot_endmember_cluster(signatures) plot_endmember_density_bar(signatures) plot_endmember_density_box(signatures) plot_residuals(signatures)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.