R中定义分布（p,1）;(1-p,-1),
1、p为0-1的定值
2、p为随机变量
能否用得到的取样函数做随机游走的模拟？