# NOT RUN {
library(ggplot2)
rw2() %>% plot()
rw2(s1=1,s2=1,tau=0.1) %>%
simulate(nsim=10,format="d") %>%
ggplot(aes(x=y1,y=y2,group=.id,color=.id))+
geom_path()+
guides(color=FALSE)+
theme_bw()
# }
Run the code above in your browser using DataLab