     x = "Sepal Length",
       y = "Sepal Width")
       
       write_rds(x = iris_p, file = "data/test_1.rds") </td>
  </tr>
  <tr>
   <td style="text-align:left;"> writing-to-a-file-6 </td>
   <td style="text-align:left;"> exercise </td>
   <td style="text-align:left;"> list.files("data") </td>
  </tr>
  <tr>
   <td style="text-align:left;"> writing-to-a-file-7 </td>
   <td style="text-align:left;"> exercise </td>
   <td style="text-align:left;"> read_rds(file = "data/test_1.rds") </td>
  