Assignment on plotly as R presentation

1. This presentation is assignment for Developing Data Products - JHU Data Science Specialization
2. Data set mtcars from library(datasets)
3. Plot shows the mpg of cars which have cylinder capacity of 4,6,8 respectively against horse power

library(datasets)
mtcars$cyl <- factor(mtcars$cyl,labels=c('4 cylinders','6 cylinders','8cylinders'))