lubridate::as_date() inside dplyr::

Hi Abraham,

Thanks OK, and it's actually better not to post images, but post the data you're working with instead, between a pair of triple backticks, like this:

``` r
<-- paste output of dput(head(raw.main)) here
```