Assignment Plot.
For Assignment we are going to plot 3D Scatterplot of mtcars dataset with Milage(MPG),Weigth(Wt) and Horse Power and see how they vary in 3d Scatterplot.
library(plotly)
data("mtcars")
attach(mtcars)
plot_ly(x = mtcars$mpg,y=mtcars$wt,z=mtcars$hp,type="scatter3d")