我有以下代码:
set.seed(1)
jitter(rep(0, 7))
#> [1] -0.009379653 -0.005115044 0.002914135 0.016328312 -0.011932723
#> [6] 0.015935587 0.017787011
请注意,功能抖动会添加负值。我怎么能够 参数化该函数,使其仅返回正值?
答案 0 :(得分:2)
如果您只想产生正抖动,那么也许您可以采用通话的绝对值:
x <- rep(0, 7)
abs(jitter(x))
[1] 0.009379653 0.005115044 0.002914135 0.016328312 0.011932723 0.015935587
[7] 0.017787011