::: {.cell hash='Lecture_cache/revealjs/unnamed-chunk-73_a117177515c6f9d3b534ff8b58b086ae'}

```{.r .cell-code}
table(s$keep)
```

::: {.cell-output .cell-output-stdout}
```

FALSE  TRUE 
   42   299 
```
:::
:::