if (FALSE) {
## Create a simple system-configuration (S3 SysConfigClass)
sc <- simpleSysConfig()
## And modify it as you wish.
## in this case change the setting for the printer
## from the parallel port to the serial port:
sc$PrinterPort <- factor("SERIAL_PRINTER", levels(sc$PrinterPort))
## It is also to provide modifications to the configuration
## via the 'options' argument:
sc <- simpleSysConfig(options = list(FontHeight = 9))
}
Run the code above in your browser using DataLab