What am I doing wrong?
library(“plotly”, lib.loc="~/R/win-library/3.5")
Earthquake <- rnorm(2048,0,1)
Explosion <- rnorm(2048,0,1)
data <- data.frame(x, Explosion, Earthquake)
p <- plot_ly(data, y = ~Explosion, name = ‘Explosion’, type = ‘scatter’, mode = ‘lines’) %>%
add_trace(y = ~Earthquake, name = ‘Earthquake’, mode = ‘lines’) %>%
layout(xaxis = list(tickvals = c(0,1024,2048)))
chart_link = api_create(p, filename=“fu”)
chart_link