Running ‘testthat.r’ [5s/5s]
Running the tests in ‘tests/testthat.r’ failed.
Complete output:
  > library(testthat)
  > library(geoelectrics)
  Loading required package: lattice
  Loading required package: rgl
  Loading required package: fields
  Loading required package: spam
  Loading required package: dotCall64
  Loading required package: grid
  Spam version 2.2-0 (2018-06-19) is loaded.
  Type 'help( Spam)' or 'demo( spam)' for a short introduction 
  and overview of this package.
  Help for individual functions is also obtained by adding the
  suffix '.spam' to the function name, e.g. 'help( chol.spam)'.
  
  Attaching package: 'spam'
  
  The following objects are masked from 'package:base':
  
      backsolve, forwardsolve
  
  Loading required package: maps
  See www.image.ucar.edu/~nychka/Fields for
   a vignette and other supplements. 
  
  Attaching package: 'fields'
  
  The following object is masked from 'package:testthat':
  
      describe
  
  > 
  > test_check("geoelectrics")
  Created an empty GPS coordinates object.
  ── 1. Error: Test ProcessedData Constructor Correct Address (@test_ProcessedData
  replacement has 1 row, data has 0
  1: new("ProcessedData", address = testFileAddress) at testthat/test_ProcessedData.r:45
  2: initialize(value, ...)
  3: initialize(value, ...)
  4: .local(.Object, ...)
  5: getHeightInformation(.Object)
  6: getHeightInformation(.Object)
  7: `[<-`(`*tmp*`, j, , value = c(3, 510.2))
  8: `[<-.data.frame`(`*tmp*`, j, , value = c(3, 510.2))
  9: xpdrows.data.frame(x, rows, new.rows)
  10: `[[<-`(`*tmp*`, i, value = NA_real_)
  11: `[[<-.data.frame`(`*tmp*`, i, value = NA_real_)
  12: stop(sprintf(ngettext(N, "replacement has %d row, data has %d", "replacement has %d rows, data has %d"), 
         N, nrows), domain = NA)
  
  Created an empty processed data object.
  ── 2. Error: Test Parse Processed Data File Correct Address (@test_ProcessedData
  replacement has 1 row, data has 0
  1: getHeightInformation(processedData) at testthat/test_ProcessedData.r:60
  2: getHeightInformation(processedData)
  3: `[<-`(`*tmp*`, j, , value = c(3, 510.2))
  4: `[<-.data.frame`(`*tmp*`, j, , value = c(3, 510.2))
  5: xpdrows.data.frame(x, rows, new.rows)
  6: `[[<-`(`*tmp*`, i, value = NA_real_)
  7: `[[<-.data.frame`(`*tmp*`, i, value = NA_real_)
  8: stop(sprintf(ngettext(N, "replacement has %d row, data has %d", "replacement has %d rows, data has %d"), 
         N, nrows), domain = NA)
  
  Created an empty GPS coordinates object.
  Created an empty raw data object.
  Created an empty processed data object.
  Created an empty raw data object.
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 45 SKIPPED: 12 FAILED: 2
  1. Error: Test ProcessedData Constructor Correct Address (@test_ProcessedData.r#45) 
  2. Error: Test Parse Processed Data File Correct Address (@test_ProcessedData.r#60) 
  
  Error: testthat unit tests failed
  Execution halted