Week-2 Assignment

library(plotly)

## Loading required package: ggplot2

## 
## 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

fig <- plot_ly(data = iris, x = ~Petal.Length, 
               y = ~Petal.Width, color = ~Species) %>% 
    layout(title="Petal Width Vs Petal Length", 
           xaxis=list(title="Petal Length"), 
           yaxis=list(title="Petal Width"))
fig

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

## No scatter mode specifed:
##   Setting the mode to markers
##   Read more about this attribute -> https://plotly.com/r/reference/#scatter-mode