if (interactive()) {
  if (!HttpDaemon$isStarted()) {
    # Start the web server
    rootPath <- system.file("rsp", package="R.rsp")
    HttpDaemon$start(rootPath=rootPath, port=8074, default="index.rsp")
  }
 
  browseURL("http://127.0.0.1:8074/")
}Run the code above in your browser using DataLab