What is a possible R code to simulate a one-dimensional Brownian Motion path with each step explained?

Question

n <- 1000
t <- 100
bm <- c(0, cumsum(rnorm(n,0,sqrt(t/n))))
steps <- seq(0,t,length=n+1)
plot(steps,bm,type="l",xlab="Time",ylab=&quo