## Not run:
# # Copies fib.c and fib.r from the examples directory in
# # PBSmodelling to the temporary working directory, and opens these files.
# local(envir=.PBSmodEnv,expr={
# cwd = getwd(); setwd(tempdir())
# openExamples("PBSmodelling", c("fib"), c(".r", ".c"))
# setwd(cwd)
# })
# ## End(Not run)
Run the code above in your browser using DataLab