Running ‘doRUnit.R’ [9s/13s]
Running the tests in ‘tests/doRUnit.R’ failed.
Complete output:
  > ## unit tests will not be done if RUnit is not available
  > if(require("RUnit", quietly=TRUE)) {    
  +  
  +   ## --- Setup ---
  +  
  +   pkg <- "prc" # <-- Change to package name!
  +   if(Sys.getenv("RCMDCHECK") == "FALSE") {
  +     ## Path to unit tests for standalone running under Makefile (not R CMD check)
  +     ## PKG/tests/../inst/unitTests
  +     path <- file.path(getwd(), "unitTests")
  +   } else {
  +     ## Path to unit tests for R CMD check
  +     ## PKG.Rcheck/tests/../PKG/unitTests
  +     path <- system.file("unitTests", package=pkg)
  +   }
  +   cat("\nRunning unit tests\n")
  +   print(list(pkg=pkg, getwd=getwd(), pathToUnitTests=path))
  +  
  +   library(package=pkg, character.only=TRUE)
  +  
  +   ## If desired, load the name space to allow testing of private functions
  +   ## if (is.element(pkg, loadedNamespaces()))
  +   ##     attach(loadNamespace(pkg), name=paste("namespace", pkg, sep=":"), pos=3)
  +   ##
  +   ## or simply call PKG:::myPrivateFunction() in tests
  +  
  +   ## --- Testing ---
  +  
  +   ## Define tests
  +   testSuite <- defineTestSuite(name=paste(pkg, "unit testing"),
  +                                           dirs=path)
  +   ## Run
  +   tests <- runTestSuite(testSuite)
  +  
  +   ## Default report name
  +   pathReport <- file.path(path, "report")
  +  
  +   ## Report to stdout and text files
  +   cat("------------------- UNIT TEST SUMMARY ---------------------\n\n")
  +   printTextProtocol(tests, showDetails=FALSE)
  +   printTextProtocol(tests, showDetails=FALSE,
  +                     fileName=paste(pathReport, "Summary.txt", sep=""))
  +   printTextProtocol(tests, showDetails=TRUE,
  +                     fileName=paste(pathReport, ".txt", sep=""))
  +  
  +   ## Report to HTML file
  +   printHTMLProtocol(tests, fileName=paste(pathReport, ".html", sep=""))
  +  
  +   ## Return stop() to cause R CMD check stop in case of
  +   ##  - failures i.e. FALSE to unit tests or
  +   ##  - errors i.e. R errors
  +   tmp <- getErrors(tests)
  +   if(tmp$nFail > 0 | tmp$nErr > 0) {
  +     stop(paste("\n\nunit testing failed (#test failures: ", tmp$nFail,
  +                ", #R errors: ",  tmp$nErr, ")\n\n", sep=""))
  +   }
  + } else {
  +   warning("cannot run unit tests -- package RUnit is not available")
  + }
  
  Running unit tests
  $pkg
  [1] "prc"
  
  $getwd
  [1] "/home/hornik/tmp/R.check/r-devel-gcc/Work/PKGS/prc.Rcheck/tests"
  
  $pathToUnitTests
  [1] "/tmp/RtmpuZmhRU/RLIBS_a00266d3251/prc/unitTests"
  
  Loading required package: kyotil
  Loading required package: nlme
  
  
  Executing test function test.prc  ... model = 4P ; method = TLS ; opt.method = gnls ; init.method = gnls 
  init: 16.2 29509.5 -1 1 
  LS fit: 17.79484 28150.1 -2.078589 0.4890619 
  Iter 1: 17.07395 28118.29 -2.115742 0.4771598 logLik: 793.3028
  Iter 2: 16.78406 28096.64 -2.139227 0.4709981 logLik: 794.0625
  Iter 3: 16.67068 28080.2 -2.155626 0.466967 logLik: 794.3482
  Iter 4: 16.62247 28067.24 -2.167381 0.4641543 logLik: 794.484
  Iter 5: 16.59845 28056.75 -2.175925 0.4621392 logLik: 794.5548
  Iter 6: 16.58458 28048.1 -2.182206 0.4606717 logLik: 794.5939
  Iter 7: 16.58458 28048.1 -2.182206 0.4606717 logLik: 794.6066
  converged
  number of rvar needed to be adjusted: 0 
  Time difference of 5.236947 secs
  model = 4P ; method = TLS ; opt.method = optim ; init.method = gnls 
  init: 16.2 29509.5 -1 1 
  LS fit: 17.79484 28150.1 -2.078589 0.4890619 
  Iter 1: 17.64918 28150.1 -2.132442 0.4743951
  Iter 2: 17.53313 28150.1 -2.14812 0.4698829
  Iter 3: 17.43385 28150.1 -2.153786 0.4681174
  Iter 4: 17.34673 28150.09 -2.156353 0.4672731
  Iter 5: 17.26941 28150.09 -2.157749 0.4668032
  Iter 6: 17.26941 28150.09 -2.157746 0.4667939
  converged
  number of rvar needed to be adjusted: 0 
  Time difference of 2.430766 secs
  model = 4P ; method = naive ; opt.method = gnls ; init.method = optim 
  init: 16.2 29509.5 -1 1 
  model = 3P ; method = TLS ; opt.method = gnls ; init.method = gnls 
  init: 16.2 29509.5 -1 
  LS fit: 19.10436 32457.67 -1.139482 1 
  Iter 1: 20.1007 32133.11 -1.155259 1 logLik: 603.089
  Iter 2: 20.67344 32021.91 -1.159205 1 logLik: 604.1607
  Iter 3: 20.98602 31977.14 -1.160421 1 logLik: 604.3874
  Iter 4: 21.1606 31956.66 -1.160907 1 logLik: 604.449
  Iter 5: 21.2592 31946.68 -1.161139 1 logLik: 604.4675
  Iter 6: 21.2592 31946.68 -1.161139 1 logLik: 604.4711
  converged
  number of rvar needed to be adjusted: 0 
   done successfully.
  
  
  
  Executing test function test.prcsp  ... model = sp ; method.init = TLS 
  Loading required namespace: Rmosek
  Failed with error:  'there is no package called 'Rmosek''
  [1] "Rmosek does not load successfully"
  Time difference of 0.002377272 secs
  model = struct ; method.init = TLS 
  
  ========== run prc to initialize ================
  model = 4P ; method = TLS ; opt.method = gnls ; init.method = gnls 
  init: 16.2 29263.5 -1 1 
  LS fit: 19.00128 28442.79 -1.978153 0.5194024 
  Iter 1: 19.00128 28442.79 -1.978153 0.5194024 logLik: 179.8906
  converged
  number of rvar needed to be adjusted: 0 
  
  initial nu: 1 1 
  initial theta: 2.944506 10.25565 -1.978153 0.5194024 0.003206604 
  
  =========== Iter 1 ==============
  opt nu     :  1.6634 0.6560899 ; 72.10891 
  opt theta  :  2.944506 10.25498 -2.042871 0.5008676 0.003206604 ; 72.23947 
  opt sigmasq:  2.944506 10.25498 -2.042871 0.5008676 0.003027775 ; 72.27426 
  opt theta  :  2.944506 10.25485 -2.044049 0.5005349 0.003027775 ; 72.27429 
  opt sigmasq:  2.944506 10.25485 -2.044049 0.5005349 0.003031732 ; 72.27444 
  opt theta  :  2.944506 10.25486 -2.044049 0.5005353 0.003031732 ; 72.27444 
  opt sigmasq:  2.944506 10.25486 -2.044049 0.5005353 0.003031394 ; 72.27443 
  
  Stop: max iter reached
  Time difference of 1.523046 secs
   done successfully.
  
  ------------------- UNIT TEST SUMMARY ---------------------
  
  RUNIT TEST PROTOCOL -- Sat Jan 20 19:43:15 2018 
  *********************************************** 
  Number of test functions: 2 
  Number of errors: 0 
  Number of failures: 0 
  
   
  1 Test Suite : 
  prc unit testing - 2 test functions, 0 errors, 0 failures
  Error in file(file, ifelse(append, "a", "w")) : 
    cannot open the connection
  Calls: printTextProtocol -> cat -> file
  In addition: Warning message:
  In file(file, ifelse(append, "a", "w")) :
    cannot open file '/tmp/RtmpuZmhRU/RLIBS_a00266d3251/prc/unitTests/reportSummary.txt': Read-only file system
  Execution halted