Plotly

library(plotly)

data(iris)

plot_ly(x= iris$Sepal.Width, y= iris$Sepal.Length, z = iris$Species, 
type = "scatter3d", mode = "markers", color = iris$Species)