DescTools (version 0.99.36)

Zodiac: Calculate the Zodiac of a Date

Description

Calculate the sign of zodiac of a date.

Usage

Zodiac(x, lang = c("engl", "deu"), stringsAsFactors = TRUE)

Arguments

x

the date to be transformed.

lang

the language of the zodiac names, can be english (default) or german ("deu").

stringsAsFactors

logical. If set to TRUE (default) the result will consist of a factor with zodiac signs as levels.

Value

character vector or factor with the zodiac.

Details

The really relevant things can sometimes hardly be found. You just discovered such a function... ;-)

See Also

Year and other date functions

Examples

# NOT RUN {
Zodiac(as.Date(c("1937-07-28", "1936-06-01", "1966-02-25",
                 "1964-11-17", "1972-04-25")), lang="deu")

d <- sample(seq(as.Date("2015-01-01"), as.Date("2015-12-31"), 1), 120)
z <- Zodiac(d)
Desc(z)
# }