library(ggplot2)
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
mydataset <- data.frame(x = c(1, 2, 1, 2),
                        y = c(1, 4, 10, 14),
                        group = c("S1", "S1", "S2", "S2"),
                        color = c("blue", "blue", "red", "red"),
                        stringsAsFactors = FALSE)

gplt <- ggplot(mydataset) + geom_line(aes(x=x, y=y, group = group, color = color)) + scale_color_identity()
gplt

gpltly <- ggplotly(gplt)
gpltly
gplt <- ggplot(mydataset) + geom_line(aes(x=x, y=y, group = group),
                                      color = mydataset$color)
gplt

gpltly <- ggplotly(gplt)
gpltly
devtools::session_info()
## Session info --------------------------------------------------------------
##  setting  value                       
##  version  R version 3.3.1 (2016-06-21)
##  system   x86_64, linux-gnu           
##  ui       X11                         
##  language (EN)                        
##  collate  en_US.UTF-8                 
##  tz       Europe/Busingen             
##  date     2016-11-04
## Packages ------------------------------------------------------------------
##  package     * version    date       source                          
##  assertthat    0.1        2013-12-06 CRAN (R 3.2.0)                  
##  base64enc     0.1-3      2015-07-28 CRAN (R 3.3.1)                  
##  colorspace    1.2-7      2016-10-11 CRAN (R 3.3.1)                  
##  DBI           0.5-1      2016-09-10 CRAN (R 3.3.1)                  
##  devtools      1.12.0     2016-06-24 CRAN (R 3.3.1)                  
##  digest        0.6.10     2016-08-02 CRAN (R 3.3.1)                  
##  dplyr         0.5.0      2016-06-24 CRAN (R 3.3.1)                  
##  evaluate      0.10       2016-10-11 CRAN (R 3.3.1)                  
##  formatR       1.4        2016-05-09 CRAN (R 3.3.1)                  
##  ggplot2     * 2.1.0.9001 2016-11-03 Github (hadley/ggplot2@9869339) 
##  gtable        0.2.0      2016-02-26 CRAN (R 3.3.1)                  
##  htmltools     0.3.5      2016-03-21 CRAN (R 3.3.1)                  
##  htmlwidgets   0.7        2016-08-02 CRAN (R 3.3.1)                  
##  httr          1.2.1      2016-07-03 cran (@1.2.1)                   
##  jsonlite      1.1        2016-09-14 CRAN (R 3.3.1)                  
##  knitr         1.14       2016-08-13 CRAN (R 3.3.1)                  
##  labeling      0.3        2014-08-23 CRAN (R 3.2.0)                  
##  lazyeval      0.2.0      2016-06-12 CRAN (R 3.3.1)                  
##  magrittr      1.5        2014-11-22 CRAN (R 3.1.3)                  
##  memoise       1.0.0      2016-01-29 CRAN (R 3.3.1)                  
##  munsell       0.4.3      2016-02-13 CRAN (R 3.3.1)                  
##  plotly      * 4.5.5.9000 2016-11-02 Github (ropensci/plotly@2e3f20d)
##  plyr          1.8.4      2016-06-08 CRAN (R 3.3.1)                  
##  purrr         0.2.2      2016-06-18 CRAN (R 3.3.1)                  
##  R6            2.2.0      2016-10-05 CRAN (R 3.3.1)                  
##  Rcpp          0.12.7     2016-09-05 CRAN (R 3.3.1)                  
##  rmarkdown     1.1        2016-10-16 CRAN (R 3.3.1)                  
##  scales        0.4.0.9003 2016-10-28 Github (hadley/scales@d58d83a)  
##  stringi       1.1.2      2016-10-01 CRAN (R 3.3.1)                  
##  stringr       1.1.0      2016-08-19 CRAN (R 3.3.1)                  
##  tibble        1.2        2016-08-26 CRAN (R 3.3.1)                  
##  tidyr         0.6.0      2016-08-12 CRAN (R 3.3.1)                  
##  viridisLite   0.1.3      2016-03-12 CRAN (R 3.3.1)                  
##  withr         1.0.2      2016-06-20 CRAN (R 3.3.1)                  
##  yaml          2.1.13     2014-06-12 CRAN (R 3.1.3)