R中，关于已知概率如何生成需要数量的点的模拟问题

我想，文献上4.1中的方法可能是错误的，如果每一个地点的位置A时间发生的概率一定，通过sample以各个地点的概率为权重来模拟，得到的各个地点的概率其实比原先的真实值要小！

对吗？