add_calendar: Add a Calendar to a Workspace

View source: R/workspace.R

add_calendarR Documentation

Add a Calendar to a Workspace

Description

Add a Calendar to a Workspace

Usage

add_calendar(jws, name, calendar)

Arguments

jws

a java workspace object.

name

character name of the calendar to add.

calendar

JDemetra+ calendar to add.

Value

NULL returned invisibly

Examples


# French calendar
french_calendar <- rjd3toolkit::national_calendar(
    days = list(
        rjd3toolkit::fixed_day(7, 14), # Bastille Day
        rjd3toolkit::fixed_day(5, 8, validity = list(start = "1982-05-08")), # End of 2nd WW
        rjd3toolkit::special_day("NEWYEAR"),
        rjd3toolkit::special_day("CHRISTMAS"),
        rjd3toolkit::special_day("MAYDAY"),
        rjd3toolkit::special_day("EASTERMONDAY"),
        rjd3toolkit::special_day("ASCENSION"),
        rjd3toolkit::special_day("WHITMONDAY"),
        rjd3toolkit::special_day("ASSUMPTION"),
        rjd3toolkit::special_day("ALLSAINTSDAY"),
        rjd3toolkit::special_day("ARMISTICE")
    )
)
# Load a Workspace
file <- system.file("workspaces", "workspace_test.xml", package = "rjd3workspace")
jws <- jws_open(file)

# Add calendar to the workspace
add_calendar(jws, "French Calendar", french_calendar)
get_context(jws) # The workspace already contained a Test Calendar


palatej/rjdemetra3 documentation built on July 16, 2025, 5:41 p.m.