times showing as seconds without hms loaded

[malcolmbarrett]

as discussed in r-causal/causal-inference-in-R#198 by @tgerke

It seems that without library(hms) (or library(tidyverse)) that hms time objects are showing as seconds.

touringplans::parks_metadata_raw |> dplyr::select(mkclose)
#> # A tibble: 2,079 × 1
#>    mkclose   
#>    <hms>     
#>  1 90000 secs
#>  2 90000 secs
#>  3 90000 secs
#>  4 86400 secs
#>  5 82800 secs
#>  6 75600 secs
#>  7 75600 secs
#>  8 75600 secs
#>  9 75600 secs
#> 10 82800 secs
#> # ℹ 2,069 more rows

library(hms)

touringplans::parks_metadata_raw |> dplyr::select(mkclose)
#> # A tibble: 2,079 × 1
#>    mkclose
#>    <time> 
#>  1 25:00  
#>  2 25:00  
#>  3 25:00  
#>  4 24:00  
#>  5 23:00  
#>  6 21:00  
#>  7 21:00  
#>  8 21:00  
#>  9 21:00  
#> 10 23:00  
#> # ℹ 2,069 more rows

^{Created on 2023-11-21 with reprex v2.0.2}