initValue = 10
T         = 100
rwalk     = initValue + c(0,cumsum(rnorm(T)))
plot(rwalk, type="o", ylab="Random Walk")

LS0tCnRpdGxlOiAiUmFuZG9tIFdhbGsgVGltZSBTZXJlaWVzIgpvdXRwdXQ6IGh0bWxfbm90ZWJvb2sKLS0tCgoKCmBgYHtyfQppbml0VmFsdWUgPSAxMCAgICAgICAgICAgICAgICAgICMgU3RhcnRpbmcgUG9pbnQgZm9yIHRoZSBUaW1lIFNlcmllcwpUICAgICAgICAgPSAxMDAgICAgICAgICAgICAgICAgICMgTnVtYmVyIG9mIHN0ZXBzIApyd2FsayAgICAgPSBpbml0VmFsdWUgKyBjKDAsY3Vtc3VtKHJub3JtKFQpKSkgIyBSYW5kb20gV2FsawpwbG90KHJ3YWxrLCB0eXBlPSJvIiwgeWxhYj0iUmFuZG9tIFdhbGsiKSAgICAgIyBQbG90IG9mIFJhbmRvbSBXYWxrCmBgYAoK