我需要根据小于10的Ave_redemption_hours过滤data1（数据框）。代码可以工作
data2 <- data1[data1$Avg_redemption_hours < 10,]
我想为num和var分配一个值，并将这些值用于fileter data1，但data2不返回任何值。
num=10
var = quote(Avg_redemption_hours)
data2=data1[noquote(paste('data1',var,sep="$")) >num ,]
有谁知道这里的问题以及如何解决这个问题？
致以最诚挚的问候，
肯