使用lapply在具有不同元素数的列表上应用函数以获取不同的值

时间:2017-09-21 21:20:43

标签: r

这个功能是我几乎需要的功能。但是我期望获得不同值的问题,也就是说,我想计算运行if我的列表中每个元素的函数。但是,正如您所看到的,该函数不会计算它,它只计算一个并重复该值,例如1.158114。我是否需要更改if else或修改它?

L = list(c(F,T),c(F,F,F,T))
VAR = 1
IQ = 3   
lapply(L, function(x){ifelse(x, runif(1, IQ - VAR, IQ + VAR), runif(1,0.20 - VAR , 0.20 + VAR))})

[[1]]
[1] -0.1924877  2.0677188

[[2]]
[1] 1.158114 1.158114 1.158114 2.408010

0 个答案:

没有答案