Отмена цитирования dplyr не работает с функцией фильтра

Question

возможно я что-то упускаю, но я не могу заставить оператор расстановки dplyr работать с функцией фильтра. Это происходит с помощью select, но не с filter ...

Пример

  set.seed(1234)
  A = matrix(rnorm(100),nrow = 10, ncol = 10)
  colnames(A) <- paste("var", seq(1:10), sep = "")
  varname_test <- "var2"

  A <- as_tibble(A)

  select(A, !!varname_test) #this works as expected

  # this does NOT give me only the rows where var2
  # is positive
  (result1 <- filter(A, !!varname_test > 0))


  # This is how the result 1 should look like
  (result2 <- filter(A, var2 > 0))

  # result1 is not equal to result2

Буду признателен за любую помощь!