mtcars$am = as.character(mtcars$am) plot_ly(mtcars,x = ~ wt, y= ~ mpg, color = ~ am, type='scatter', mode = 'markers') %>% add_trace(x = c(2,15), ...
確定! 回上一頁