Skip to contents

Season as factor/numeric

Usage

season_factor(x, label = FALSE, abbr = TRUE)

Arguments

x

chr/Date/POSIXt Names of seasons as case insensitive character vector, if using abbreviations, they must be of consistent length. Otherwise, a Date or POSIXt.

Value

factor If x is provided, the season as a factor. If x is not provided, an ordered factor of the seasons.

Examples

season_factor()
#> [1] Spr Sum Fal Win
#> Levels: Spr Sum Fal Win
season_factor(c('Sp', 'Su'))
#> [1] 3 6
season_factor(c('Sp', 'Su'), label = TRUE)
#> [1] Spr Sum
#> Levels: Spr < Sum < Fal < Win
season_factor(seq(lubridate::floor_date(Sys.time(), "year"), Sys.time(), by = "day"), label = TRUE, abbr = FALSE)
#>   [1] Winter Winter Winter Winter Winter Winter Winter Winter Winter Winter
#>  [11] Winter Winter Winter Winter Winter Winter Winter Winter Winter Winter
#>  [21] Winter Winter Winter Winter Winter Winter Winter Winter Winter Winter
#>  [31] Winter Winter Winter Winter Winter Winter Winter Winter Winter Winter
#>  [41] Winter Winter Winter Winter Winter Winter Winter Winter Winter Winter
#>  [51] Winter Winter Winter Winter Winter Winter Winter Winter Winter Winter
#>  [61] Spring Spring Spring Spring Spring Spring Spring Spring Spring Spring
#>  [71] Spring Spring Spring Spring Spring Spring Spring Spring Spring Spring
#>  [81] Spring Spring Spring Spring Spring Spring Spring Spring Spring Spring
#>  [91] Spring Spring Spring Spring Spring Spring Spring Spring Spring Spring
#> [101] Spring Spring Spring Spring Spring Spring Spring Spring Spring Spring
#> [111] Spring Spring Spring Spring Spring Spring Spring Spring Spring Spring
#> [121] Spring Spring Spring Spring Spring Spring Spring Spring Spring Spring
#> [131] Spring Spring Spring Spring Spring Spring Spring Spring Spring Spring
#> [141] Spring Spring Spring Spring
#> Levels: Spring < Summer < Fall < Winter