## ----setup, include = FALSE---------------------------------------------------
knitr::opts_chunk$set(collapse = TRUE, comment = "#>")
library(theRefdate)

## -----------------------------------------------------------------------------
flavour()

## -----------------------------------------------------------------------------
jahr("02.02.2002")

## -----------------------------------------------------------------------------
monat("14.06.1789")

## -----------------------------------------------------------------------------
tag("03.02.2000")

## -----------------------------------------------------------------------------
result <- dateDiff("01.12.1999", "01.01.2000")
result$diffJ
result$diffM
result$diffDauer
result$diffDauerM

## -----------------------------------------------------------------------------
dateAddMonths("01.01.2000",   1)   # add 1 month
dateAddMonths("01.01.2000",  -1)   # subtract 1 month
dateAddMonths("01.01.2000",  12)   # add 1 year
dateAddMonths("01.01.2000", -13)   # subtract 13 months