## Not run:
# if.R(r={
# trellis.device(theme="col.hh") ## Open a device with the theme
#
# trellis.device(theme=col.hh()) ## Open a device with the theme
#
# trellis.par.set(theme=col.hh())## Add theme to already open device
# },s={})
# ## End(Not run)
Run the code above in your browser using DataLab