Plotly Demo

Height-Weight data set

data(heightweight) # For the data set

## First do a bar plot in ggplot
g <- ggplot(heightweight, aes(x = ageYear, y = heightIn, shape = sex, colour = sex)) +
    geom_point() +
  scale_shape_manual(values = c(1,2)) +
  scale_colour_brewer(palette = "Set1")

## Let's try to get it into plot.ly
ggplotly(g)