library(lubridate)
#> Loading required package: timechange
#>
#> Attaching package: 'lubridate'
#> The following objects are masked from 'package:base':
#>
#> date, intersect, setdiff, union
d <- read.csv("/Users/ro/projects/demo/data.csv")
# doubles all come over as NA, so drop
d <- d[,1]
# convert to date objects discarding seconds
ymd_hm(d) |> head()
#> [1] "2022-01-16 00:00:00 UTC" "2022-01-16 00:01:00 UTC"
#> [3] "2022-01-16 00:02:00 UTC" "2022-01-16 00:03:00 UTC"
#> [5] "2022-01-16 00:04:00 UTC" "2022-01-16 00:05:00 UTC"
This stores the data as a Date object. If the end goal is to convert to 2022-01-16 00:04 for display, there are a couple of ways to do that, and the choice depends on whether need to make date calculations exists.