title: Row-wise summation errors
body: <p>I have "wide-format" data that begins:</p>
  
  <pre><code>id var_1 var_2 var_3...
  1  NaN   0     1
  2  2     NaN   3
  3  1     4     NaN
  .
  .
  .
  </code></pre>
  
  <p>The entire data-set is thousands of observations and hundreds of variables. I'm trying to filter for observations that have a value of exactly 1 in any of var_1 through var_12.</p>
  
  <p>My attempt</p>
  
  <pre><code>library(package = dplyr)
  
  data &lt;- data %&gt;%
    mutate(my_obs = select(var_1:var_12) %&gt;%
             apply(MARGIN = 1, 
                   FUN = function(x) any(x == 1,
                                         na.rm = TRUE)) == TRUE) %&gt;%
    filter(my_obs == 1)
  </code></pre>
  
  <p>generated the following error:</p>
  
  <pre><code>Error in mutate_impl(.data, dots):
  
  no applicable method for "select_" applied to an object of class
  c("double", "numeric")
  </code></pre>