plot.ly/r/getting-started p <- plot_ly (library( plotly ) x = rnorm( 1000 ), y = rnorm( 1000 ), mode = Â¢Ã‚âmarkersÃƒÂ¢Ã‚â‚¬ â„¢ ) plot_ly (x = c( 1, 2, 3 ), y = c( 5, 6, 7 ), type = ÃƒÂ¢Ã‚âscatterÃƒÂ¢Ã‚â‚¬Ã‚ â„¢ , mode = ÃƒÂ¢Ã‚âmarkersÃƒÂ¢Ã‚â‚¬Ã‚â„¢ , size = c( 1, 5, 10 ), marker = list(color = c( Â¢Ã â‚¬Ã‚ËœmerahÃƒÂ¢Ã‚ââ, Â¢Ã‚âbiruÃƒÂ¢Ã‚â‚¬Ã‚â„¢ , Â¢Ã‚â‚¬Ã‚ hijauÃƒÂ¢Ã‚ââ ))) plot_ly (x = c( 1, 2, 3 ), y = c( 5, 6, 7), tipe = Â¢Ã‚â‚¬Ã‚ scatterÃƒÂ¢Ã‚ââ , modus = Â¢Ã‚âgarisÃƒÂ¢Ã‚â‚¬Ã‚â„¢ ) plot_ly (x = c( 1, 2, 3 ), y = c( 5, 6, 7 ), jenis = Â¢Ã‚âscatterÃƒÂ¢Ã‚â‚¬Ã‚â„¢ , mode = Â¢Ã‚âmarkersÃƒÂ¢Ã‚ â‚¬Ã‚â„¢ ) plot_ly (x = c( 1, 2, 3), y = c( 5, 6, 7), type = Â¢Ã‚â‚¬Ã‚ËœbarÃƒÂ¢Ã‚â‚ â„¢ , modus = ÃƒÂ¢Ã‚âpenandaÃƒÂ¢Ã‚â‚¬Ã‚â„¢ ) plot_ly (x = c( 1, 2, 3 ), y = c( 5, 6, 7 ), type = Â¢Ã‚âscatterÃƒÂ¢Ã‚ââ„¢ , modus = Â¢Ã‚âlinesÃƒÂ¢Ã‚â‚¬Ã‚â , Â¯Ã‚Â¬Ã‚ ll = Â¢Ã‚âtozeroyÃƒÂ¢Ã‚ââ„¢ ) ditetapkan .seed( 123 ) x = 1 : 100 y1 = 2*x + rnorm ( 100 ) y2 = -2*x + rnorm ( 100 ) plot_ly (x = x , y = y1 ,