title: How to remove rows where all columns are zero using dplyr pipe
body: <p>I have the following data frame:</p>
  
  
  
  <pre class="lang-r prettyprint-override"><code>dat &lt;- structure(list(`A-XXX` = c(1.51653275922944, 0.077037240321129, 
  0), `fBM-XXX` = c(2.22875185527511, 0, 0), `P-XXX` = c(1.73356698481106, 
  0, 0), `vBM-XXX` = c(3.00397859609183, 0, 0)), .Names = c("A-XXX", 
  "fBM-XXX", "P-XXX", "vBM-XXX"), row.names = c("BATF::JUN_AHR", 
  "BATF::JUN_CCR9", "BATF::JUN_IL10"), class = "data.frame")
  
  dat 
  #&gt;                     A-XXX  fBM-XXX    P-XXX  vBM-XXX
  #&gt; BATF::JUN_AHR  1.51653276 2.228752 1.733567 3.003979
  #&gt; BATF::JUN_CCR9 0.07703724 0.000000 0.000000 0.000000
  #&gt; BATF::JUN_IL10 0.00000000 0.000000 0.000000 0.000000
  </code></pre>
  
  <p>I can remove the row with all column zero with this command:</p>
  
  <pre class="lang-r prettyprint-override"><code>&gt; dat &lt;- dat[ rowSums(dat)!=0, ]
  &gt; dat
                      A-XXX  fBM-XXX    P-XXX  vBM-XXX
  BATF::JUN_AHR  1.51653276 2.228752 1.733567 3.003979
  BATF::JUN_CCR9 0.07703724 0.000000 0.000000 0.000000
  </code></pre>
  
  <p>But how can I do it with dplyr's pipe style?</p>