This is an R Markdown presentation for the 3rd week assignment from Developing Data Product’s course.

The assigment goal is to create a web page presentation using R Markdown that features a plot created with Plotly

The presentation is a very simple example to simulate a time series

library(plotly)
cs <- 2*cos(2*pi*1:500/50 + .6*pi) 
wn <- rnorm(500,0,1)
tm <- Sys.Date()-seq(0, 499)

fig <- plot_ly(x = ~tm, y = ~cs, mode = 'lines')

fig2 <- plot_ly(x = ~tm, y = ~cs+wn, mode = 'lines')

fig3 <- plot_ly(x = ~tm, y = ~cs+5*wn, mode = 'lines')