add_calendar | R Documentation |
Add a Calendar to a Workspace
add_calendar(jws, name, calendar)
jws |
a java workspace object. |
name |
character name of the calendar to add. |
calendar |
JDemetra+ calendar to add. |
NULL
returned invisibly
# 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
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.