data(example_data)
syn_polar <- polar_coords(outcome = syn_example_meta$Pathotype,
data = t(syn_example_rld))
radial_plotly(polar = syn_polar, label_rows = c("COBL"))
## Faster webGL version for large numbers of points
library(plotly)
radial_plotly(polar = syn_polar, label_rows = c("COBL")) %>%
toWebGL()
Run the code above in your browser using DataLab