## Store the current config settings, so they can be reloaded at the end
## of the examples
conf_store <- tcplConfList()
tcplConfDefault()
tcplPlotM4ID(m4id = 686, lvl = 4) ## Create a level 4 plot
tcplPlotM4ID(m4id = 370, lvl = 5) ## Create a level 5 plot
tcplPlotM4ID(m4id = 322, lvl = 6) ## Create a level 6 plot
## Reset configuration
options(conf_store)
Run the code above in your browser using DataLab