title: Mutate, case_when, paste in R
body: <div class="s-table-container">
  <table class="s-table">
  <thead>
  <tr>
  <th style="text-align: left;">apple</th>
  <th style="text-align: center;">banana</th>
  <th style="text-align: right;">orange</th>
  <th style="text-align: right;">fruits_name</th>
  </tr>
  </thead>
  <tbody>
  <tr>
  <td style="text-align: left;">1</td>
  <td style="text-align: center;">0</td>
  <td style="text-align: right;">1</td>
  <td style="text-align: right;">apple orange</td>
  </tr>
  <tr>
  <td style="text-align: left;">1</td>
  <td style="text-align: center;">0</td>
  <td style="text-align: right;">0</td>
  <td style="text-align: right;">apple</td>
  </tr>
  <tr>
  <td style="text-align: left;">1</td>
  <td style="text-align: center;">0</td>
  <td style="text-align: right;">1</td>
  <td style="text-align: right;">apple orange</td>
  </tr>
  <tr>
  <td style="text-align: left;">1</td>
  <td style="text-align: center;">1</td>
  <td style="text-align: right;">1</td>
  <td style="text-align: right;">apple banana orange</td>
  </tr>
  </tbody>
  </table>
  </div>
  <p>I want to create and mutate the column &quot;frutis_name&quot; if the rest of the columns get 1.
  As an example, apple and orange got 1 then &quot;frutis_name
  will be apple space banana.</p>