为什么我在R中有两个不同的直方图

Question

通过对我的代码进行细微更改，我得出了两个不同的直方图。但我不知道原因。请帮忙，提前谢谢！

首先：

niter=1e5
W100=rep(0,niter)
for(i in 1:niter)
{
  W=cumsum(sample(c(1,-1),100,replace = TRUE))

  W100[i]=W[100]

}
hist(W100,breaks=100)

直方图：

第二

niter=1e5
W=rep(0,niter)
for(i in 1:niter)
{
  W=cumsum(sample(c(1,-1),100,replace = TRUE))

  W[i]=W[100]

}
hist(W,breaks=100)

直方图：

在W之后加100，会出现不同的直方图。为什么？