How to construct an interactive 3D Scatterplot with plotly?

Question

I\'m creating the following 2D-Scatterplot with ggplot and convert this to an plot_lyobject.

dt.data <- data.table(date = seq(as.