sVariable(default = NULL)
sVariable
defines a function that acts as a global
static variable.
# define variablex <- sVariable(1)# get value (default)x()[1] 1# set new value: return old valueold <- x(3)old[1] 1# get new valuex()[1] 3