一个＆LT; -7

Question

这个表达式：

a<-7<b:b

表示如果a 7<b==TRUE，则b分配给M<-matrix(rep(0,30), ncol=3, dimnames=list(NULL,c('q1','a1','s1'))) dummy1<-round(rexp(n=1,rate=server1)) M[loopVar,'s1']<-ifelse(M[loopVar,'q1']<dummy1,M[loopVar,'q1'],dummy1) 。怎么能在R？

中完成

在Paul Hiemstra的基础上，如何让它变得更加舒适？虚拟var或？

{{1}}

Answer 1

这样的事情应该有效：

b = runif(100, min = 1, max = 10)
a = ifelse(7 < b, 7, b)

它甚至是矢量化的。

Answer 2

一般来说，ifelse这个范例的功能正确，但是对于这个应用程序，你可以使用pmin，这应该更快一点：

a <- pmin(7,b)