# NOT RUN {
projectPath <- file.path(tempdir(), "test")
prInit(projectPath)
prScript("test")
prMoveScript("test", "testdir")
prRenameScript("testdir/test", "myTest")
prDeleteScript("testdir/myTest")
# }
Run the code above in your browser using DataLab