library(rWidgets)
n = 3
d = 6
df = data.frame(Label = paste("Class", toupper(letters[1:n])))
for (i in 1:d) df[, paste0("Eje_",i)] = runif(n)
df = df[, c(colnames(df)[1], colnames(df)[2], rev(colnames(df)[3:(d+1)]))]
DT::datatable(df, rownames=FALSE, options =
list(ordering=FALSE, searching=FALSE, paging=FALSE, info=FALSE))
d3.radarplot(df)
d3.radarplot(df[,-1], legendCol=NULL)
d3.radarplot(df, showLegend = FALSE)
d3.radarplot(df, showTitle = FALSE)
d3.radarplot(df, legend.title="Clusters", showTitle = TRUE, showLegend = FALSE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.