library(datasets) data(mtcars) head(mtcars) install.packages("plotly") install.packages("ggplot") install.packages("ggplot2")
library(plotly) plot_ly(mtcars,x = wt, y = mpg, mode = "markers") plot_ly(mtcars, x = wt, y = mpg, mode = "markers", color = as.factor(cyl)) library(plotly) set.seed(2017-11-07) temp <-rnorm(100, mean = 30, sd = 5) pressure <- rnorm(100) dtime <- 1:100 plot_ly(x = temp, y = pressure, z = dtime, type = "scatter3d", mode = "markers", color = temp)