The objective of this presentation is to generate a plot in R using the "Plotly" library. In this i am using iris dataset. This dataset contains Sepal.Length,Sepal.Width, Petal.Length, and Petal.Width of three species named setosa,versicolor and virginica.

    Sepal.Length    Sepal.Width     Petal.Length    Petal.Width   
   Min.   :4.300   Min.   :2.000   Min.   :1.000   Min.   :0.100  
   1st Qu.:5.100   1st Qu.:2.800   1st Qu.:1.600   1st Qu.:0.300  
   Median :5.800   Median :3.000   Median :4.350   Median :1.300  
   Mean   :5.843   Mean   :3.057   Mean   :3.758   Mean   :1.199  
   3rd Qu.:6.400   3rd Qu.:3.300   3rd Qu.:5.100   3rd Qu.:1.800  
   Max.   :7.900   Max.   :4.400   Max.   :6.900   Max.   :2.500  
         Species  
   setosa    :50  
   versicolor:50  
   virginica :50  
                  
                  
  

Plot

library(ggplot2)
qplot(Sepal.Length,Sepal.Width,data=iris,colour = Species)

I am able to make plot but there is a problem while i am knitting it. You can find the plot at this plotly link. https://chart-studio.plotly.com/~Alkahapur/9/#/

library(plotly)

## 
## Attaching package: 'plotly'

## The following object is masked from 'package:ggplot2':
## 
##     last_plot

## The following object is masked from 'package:stats':
## 
##     filter

## The following object is masked from 'package:graphics':
## 
##     layout

plot_ly(iris, x = ~Petal.Length, y = ~Petal.Width,color = ~Species, mode = "markers")

## No trace type specified:
##   Based on info supplied, a 'scatter' trace seems appropriate.
##   Read more about this trace type -> https://plot.ly/r/reference/#scatter

api_create(
  x = last_plot(),
  filename = NULL,
  fileopt = "overwrite",
  sharing = "public"
)

## No trace type specified:
##   Based on info supplied, a 'scatter' trace seems appropriate.
##   Read more about this trace type -> https://plot.ly/r/reference/#scatter