data(example_data)
syn_polar <- polar_coords(outcome = syn_example_meta$Pathotype,
data = t(syn_example_rld))
p <- volcano3D(syn_polar,
label_rows = c("COBL", "TREX2"))
add_animation(p)
Run the code above in your browser using DataLab