Running 'testthat.R' [68s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(fido)
  
  Attaching package: 'fido'
  
  The following objects are masked from 'package:stats':
  
      coef, predict
  
  The following objects are masked from 'package:base':
  
      as.list, print, summary
  
  > 
  > #Sys.setenv(KMP_DUPLICATE_LIB_OK="TRUE")
  > test_check("fido")
    [1]  0.89748830  0.93210641  1.96871399  0.45021206  0.72617450  1.03530678
    [7] -0.78680658  1.19513275 -0.15588689  1.52018275  0.83633948 -1.13379596
   [13] -0.71815717 -0.86957084 -1.71616592  0.40104577 -1.49093236  0.23782919
   [19]  0.85302911  0.85878649  0.73268400 -0.17905174  0.80358361 -0.25923543
   [25]  0.45458542 -1.10220890 -0.55096289 -1.18301761 -1.07195246  0.72981945
   [31] -1.00692193  0.19510519 -1.25133043  0.68782833  0.33448456  1.24196727
   [37] -1.35536699  1.55648218 -0.99656295 -0.30669208 -1.10063512 -1.45241907
   [43]  0.64186481  0.31858971  0.15218312  1.25973996 -0.93191618  0.02677317
   [49] -0.35739147  0.28557580 -0.69772017 -1.16497617  0.74481801 -1.85850966
   [55]  0.58245118 -2.11318353 -0.17626784  0.32979553 -0.36674105 -0.58283210
   [61]  0.96912762 -0.61180491  0.50897669 -0.73580825  0.42086393  1.03082255
   [67]  0.65600553  1.95678074  0.48335020 -1.13585513  0.16445351  0.67696068
   [73] -1.69578111  1.92794172 -0.71238674  1.17130121 -0.36724399 -0.72411835
   [79]  0.39379304  0.34895869 -0.05283141 -0.58819421  0.70125795  0.65924491
   [85]  0.46612127  0.25502001  1.46663643  0.48592033  0.79653686 -1.71487807
   [91] -0.45102469 -1.80391522 -0.24654253 -1.53647168  1.17221376  0.62169026
   [97] -0.71931010  0.69427828  0.96701844 -0.99984603
  $data
  # A tibble: 16 x 9
     Parameter coord  covariate      val .lower .upper .width .point .interval
     <chr>     <fct>  <fct>        <dbl>  <dbl>  <dbl>  <dbl> <chr>  <chr>    
   1 Lambda    clr_c1 x1         4.61     4.35   4.85    0.5  mean   qi       
   2 Lambda    clr_c1 x2        -1.49    -1.80  -1.17    0.5  mean   qi       
   3 Lambda    clr_c2 x1        -6.53    -7.08  -5.94    0.5  mean   qi       
   4 Lambda    clr_c2 x2        -0.00172 -0.462  0.458   0.5  mean   qi       
   5 Lambda    clr_c1 x1         4.61     4.12   5.08    0.8  mean   qi       
   6 Lambda    clr_c1 x2        -1.49    -2.08  -0.909   0.8  mean   qi       
   7 Lambda    clr_c2 x1        -6.53    -7.64  -5.47    0.8  mean   qi       
   8 Lambda    clr_c2 x2        -0.00172 -0.897  0.885   0.8  mean   qi       
   9 Lambda    clr_c1 x1         4.61     3.90   5.36    0.95 mean   qi       
  10 Lambda    clr_c1 x2        -1.49    -2.40  -0.574   0.95 mean   qi       
  11 Lambda    clr_c2 x1        -6.53    -8.26  -4.91    0.95 mean   qi       
  12 Lambda    clr_c2 x2        -0.00172 -1.35   1.40    0.95 mean   qi       
  13 Lambda    clr_c1 x1         4.61     3.57   5.55    0.99 mean   qi       
  14 Lambda    clr_c1 x2        -1.49    -2.66  -0.233   0.99 mean   qi       
  15 Lambda    clr_c2 x1        -6.53    -8.79  -4.42    0.99 mean   qi       
  16 Lambda    clr_c2 x2        -0.00172 -1.71   1.77    0.99 mean   qi       
  
  $layers
  $layers[[1]]
  geom_interval: orientation = NA, interval_size_range = c(1, 6), interval_size_domain = c(1, 6), na.rm = FALSE
  stat_identity: na.rm = FALSE
  position_identity 
  
  $layers[[2]]
  geom_point: na.rm = FALSE
  stat_identity: na.rm = FALSE
  position_identity 
  
  
  $scales
  <ggproto object: Class ScalesList, gg>
      add: function
      clone: function
      find: function
      get_scales: function
      has_scale: function
      input: function
      n: function
      non_position_scales: function
      scales: list
      super:  <ggproto object: Class ScalesList, gg>
  
  $mapping
  Aesthetic mapping: 
  * `x`    -> `.data$val`
  * `y`    -> `.data$coord`
  * `xmin` -> `.lower`
  * `xmax` -> `.upper`
  
  $theme
  List of 93
   $ line                      :List of 6
    ..$ colour       : chr "black"
    ..$ size         : num 0.5
    ..$ linetype     : num 1
    ..$ lineend      : chr "butt"
    ..$ arrow        : logi FALSE
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_line" "element"
   $ rect                      :List of 5
    ..$ fill         : chr "white"
    ..$ colour       : chr "black"
    ..$ size         : num 0.5
    ..$ linetype     : num 1
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_rect" "element"
   $ text                      :List of 11
    ..$ family       : chr ""
    ..$ face         : chr "plain"
    ..$ colour       : chr "black"
    ..$ size         : num 11
    ..$ hjust        : num 0.5
    ..$ vjust        : num 0.5
    ..$ angle        : num 0
    ..$ lineheight   : num 0.9
    ..$ margin       : 'margin' num [1:4] 0points 0points 0points 0points
    .. ..- attr(*, "unit")= int 8
    ..$ debug        : logi FALSE
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ title                     : NULL
   $ aspect.ratio              : NULL
   $ axis.title                : NULL
   $ axis.title.x              :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : NULL
    ..$ size         : NULL
    ..$ hjust        : NULL
    ..$ vjust        : num 1
    ..$ angle        : NULL
    ..$ lineheight   : NULL
    ..$ margin       : 'margin' num [1:4] 2.75points 0points 0points 0points
    .. ..- attr(*, "unit")= int 8
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ axis.title.x.top          :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : NULL
    ..$ size         : NULL
    ..$ hjust        : NULL
    ..$ vjust        : num 0
    ..$ angle        : NULL
    ..$ lineheight   : NULL
    ..$ margin       : 'margin' num [1:4] 0points 0points 2.75points 0points
    .. ..- attr(*, "unit")= int 8
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ axis.title.x.bottom       : NULL
   $ axis.title.y              : list()
    ..- attr(*, "class")= chr [1:2] "element_blank" "element"
   $ axis.title.y.left         : NULL
   $ axis.title.y.right        :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : NULL
    ..$ size         : NULL
    ..$ hjust        : NULL
    ..$ vjust        : num 0
    ..$ angle        : num -90
    ..$ lineheight   : NULL
    ..$ margin       : 'margin' num [1:4] 0points 0points 0points 2.75points
    .. ..- attr(*, "unit")= int 8
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ axis.text                 :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : chr "grey30"
    ..$ size         : 'rel' num 0.8
    ..$ hjust        : NULL
    ..$ vjust        : NULL
    ..$ angle        : NULL
    ..$ lineheight   : NULL
    ..$ margin       : NULL
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ axis.text.x               :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : NULL
    ..$ size         : NULL
    ..$ hjust        : NULL
    ..$ vjust        : num 1
    ..$ angle        : NULL
    ..$ lineheight   : NULL
    ..$ margin       : 'margin' num [1:4] 2.2points 0points 0points 0points
    .. ..- attr(*, "unit")= int 8
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ axis.text.x.top           :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : NULL
    ..$ size         : NULL
    ..$ hjust        : NULL
    ..$ vjust        : num 0
    ..$ angle        : NULL
    ..$ lineheight   : NULL
    ..$ margin       : 'margin' num [1:4] 0points 0points 2.2points 0points
    .. ..- attr(*, "unit")= int 8
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ axis.text.x.bottom        : NULL
   $ axis.text.y               :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : NULL
    ..$ size         : NULL
    ..$ hjust        : num 1
    ..$ vjust        : NULL
    ..$ angle        : NULL
    ..$ lineheight   : NULL
    ..$ margin       : 'margin' num [1:4] 0points 2.2points 0points 0points
    .. ..- attr(*, "unit")= int 8
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ axis.text.y.left          : NULL
   $ axis.text.y.right         :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : NULL
    ..$ size         : NULL
    ..$ hjust        : num 0
    ..$ vjust        : NULL
    ..$ angle        : NULL
    ..$ lineheight   : NULL
    ..$ margin       : 'margin' num [1:4] 0points 0points 0points 2.2points
    .. ..- attr(*, "unit")= int 8
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ axis.ticks                : list()
    ..- attr(*, "class")= chr [1:2] "element_blank" "element"
   $ axis.ticks.x              : NULL
   $ axis.ticks.x.top          : NULL
   $ axis.ticks.x.bottom       : NULL
   $ axis.ticks.y              : NULL
   $ axis.ticks.y.left         : NULL
   $ axis.ticks.y.right        : NULL
   $ axis.ticks.length         : 'simpleUnit' num 2.75points
    ..- attr(*, "unit")= int 8
   $ axis.ticks.length.x       : NULL
   $ axis.ticks.length.x.top   : NULL
   $ axis.ticks.length.x.bottom: NULL
   $ axis.ticks.length.y       : NULL
   $ axis.ticks.length.y.left  : NULL
   $ axis.ticks.length.y.right : NULL
   $ axis.line                 : list()
    ..- attr(*, "class")= chr [1:2] "element_blank" "element"
   $ axis.line.x               : NULL
   $ axis.line.x.top           : NULL
   $ axis.line.x.bottom        : NULL
   $ axis.line.y               : NULL
   $ axis.line.y.left          : NULL
   $ axis.line.y.right         : NULL
   $ legend.background         : list()
    ..- attr(*, "class")= chr [1:2] "element_blank" "element"
   $ legend.margin             : 'margin' num [1:4] 5.5points 5.5points 5.5points 5.5points
    ..- attr(*, "unit")= int 8
   $ legend.spacing            : 'simpleUnit' num 11points
    ..- attr(*, "unit")= int 8
   $ legend.spacing.x          : NULL
   $ legend.spacing.y          : NULL
   $ legend.key                : list()
    ..- attr(*, "class")= chr [1:2] "element_blank" "element"
   $ legend.key.size           : 'simpleUnit' num 1.2lines
    ..- attr(*, "unit")= int 3
   $ legend.key.height         : NULL
   $ legend.key.width          : NULL
   $ legend.text               :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : NULL
    ..$ size         : 'rel' num 0.8
    ..$ hjust        : NULL
    ..$ vjust        : NULL
    ..$ angle        : NULL
    ..$ lineheight   : NULL
    ..$ margin       : NULL
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ legend.text.align         : NULL
   $ legend.title              :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : NULL
    ..$ size         : NULL
    ..$ hjust        : num 0
    ..$ vjust        : NULL
    ..$ angle        : NULL
    ..$ lineheight   : NULL
    ..$ margin       : NULL
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ legend.title.align        : NULL
   $ legend.position           : chr "right"
   $ legend.direction          : NULL
   $ legend.justification      : chr "center"
   $ legend.box                : NULL
   $ legend.box.just           : NULL
   $ legend.box.margin         : 'margin' num [1:4] 0cm 0cm 0cm 0cm
    ..- attr(*, "unit")= int 1
   $ legend.box.background     : list()
    ..- attr(*, "class")= chr [1:2] "element_blank" "element"
   $ legend.box.spacing        : 'simpleUnit' num 11points
    ..- attr(*, "unit")= int 8
   $ panel.background          : list()
    ..- attr(*, "class")= chr [1:2] "element_blank" "element"
   $ panel.border              : list()
    ..- attr(*, "class")= chr [1:2] "element_blank" "element"
   $ panel.spacing             : 'simpleUnit' num 5.5points
    ..- attr(*, "unit")= int 8
   $ panel.spacing.x           : NULL
   $ panel.spacing.y           : NULL
   $ panel.grid                :List of 6
    ..$ colour       : chr "grey92"
    ..$ size         : NULL
    ..$ linetype     : NULL
    ..$ lineend      : NULL
    ..$ arrow        : logi FALSE
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_line" "element"
   $ panel.grid.major          : NULL
   $ panel.grid.minor          :List of 6
    ..$ colour       : NULL
    ..$ size         : 'rel' num 0.5
    ..$ linetype     : NULL
    ..$ lineend      : NULL
    ..$ arrow        : logi FALSE
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_line" "element"
   $ panel.grid.major.x        : NULL
   $ panel.grid.major.y        : NULL
   $ panel.grid.minor.x        : NULL
   $ panel.grid.minor.y        : NULL
   $ panel.ontop               : logi FALSE
   $ plot.background           : list()
    ..- attr(*, "class")= chr [1:2] "element_blank" "element"
   $ plot.title                :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : NULL
    ..$ size         : 'rel' num 1.2
    ..$ hjust        : num 0
    ..$ vjust        : num 1
    ..$ angle        : NULL
    ..$ lineheight   : NULL
    ..$ margin       : 'margin' num [1:4] 0points 0points 5.5points 0points
    .. ..- attr(*, "unit")= int 8
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ plot.title.position       : chr "panel"
   $ plot.subtitle             :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : NULL
    ..$ size         : NULL
    ..$ hjust        : num 0
    ..$ vjust        : num 1
    ..$ angle        : NULL
    ..$ lineheight   : NULL
    ..$ margin       : 'margin' num [1:4] 0points 0points 5.5points 0points
    .. ..- attr(*, "unit")= int 8
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ plot.caption              :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : NULL
    ..$ size         : 'rel' num 0.8
    ..$ hjust        : num 1
    ..$ vjust        : num 1
    ..$ angle        : NULL
    ..$ lineheight   : NULL
    ..$ margin       : 'margin' num [1:4] 5.5points 0points 0points 0points
    .. ..- attr(*, "unit")= int 8
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ plot.caption.position     : chr "panel"
   $ plot.tag                  :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : NULL
    ..$ size         : 'rel' num 1.2
    ..$ hjust        : num 0.5
    ..$ vjust        : num 0.5
    ..$ angle        : NULL
    ..$ lineheight   : NULL
    ..$ margin       : NULL
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ plot.tag.position         : chr "topleft"
   $ plot.margin               : 'margin' num [1:4] 5.5points 5.5points 5.5points 5.5points
    ..- attr(*, "unit")= int 8
   $ strip.background          : list()
    ..- attr(*, "class")= chr [1:2] "element_blank" "element"
   $ strip.background.x        : NULL
   $ strip.background.y        : NULL
   $ strip.placement           : chr "inside"
   $ strip.text                :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : chr "grey10"
    ..$ size         : 'rel' num 0.8
    ..$ hjust        : NULL
    ..$ vjust        : NULL
    ..$ angle        : NULL
    ..$ lineheight   : NULL
    ..$ margin       : 'margin' num [1:4] 4.4points 4.4points 4.4points 4.4points
    .. ..- attr(*, "unit")= int 8
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ strip.text.x              : NULL
   $ strip.text.y              :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : NULL
    ..$ size         : NULL
    ..$ hjust        : NULL
    ..$ vjust        : NULL
    ..$ angle        : num -90
    ..$ lineheight   : NULL
    ..$ margin       : NULL
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   $ strip.switch.pad.grid     : 'simpleUnit' num 2.75points
    ..- attr(*, "unit")= int 8
   $ strip.switch.pad.wrap     : 'simpleUnit' num 2.75points
    ..- attr(*, "unit")= int 8
   $ strip.text.y.left         :List of 11
    ..$ family       : NULL
    ..$ face         : NULL
    ..$ colour       : NULL
    ..$ size         : NULL
    ..$ hjust        : NULL
    ..$ vjust        : NULL
    ..$ angle        : num 90
    ..$ lineheight   : NULL
    ..$ margin       : NULL
    ..$ debug        : NULL
    ..$ inherit.blank: logi TRUE
    ..- attr(*, "class")= chr [1:2] "element_text" "element"
   - attr(*, "class")= chr [1:2] "theme" "gg"
   - attr(*, "complete")= logi TRUE
   - attr(*, "validate")= logi TRUE
  
  $coordinates
  <ggproto object: Class CoordCartesian, Coord, gg>
      aspect: function
      backtransform_range: function
      clip: on
      default: TRUE
      distance: function
      expand: TRUE
      is_free: function
      is_linear: function
      labels: function
      limits: list
      modify_scales: function
      range: function
      render_axis_h: function
      render_axis_v: function
      render_bg: function
      render_fg: function
      setup_data: function
      setup_layout: function
      setup_panel_guides: function
      setup_panel_params: function
      setup_params: function
      train_panel_guides: function
      transform: function
      super:  <ggproto object: Class CoordCartesian, Coord, gg>
  
  $facet
  <ggproto object: Class FacetGrid, Facet, gg>
      compute_layout: function
      draw_back: function
      draw_front: function
      draw_labels: function
      draw_panels: function
      finish_data: function
      init_scales: function
      map_data: function
      params: list
      setup_data: function
      setup_params: function
      shrink: TRUE
      train_scales: function
      vars: function
      super:  <ggproto object: Class FacetGrid, Facet, gg>
  
  $plot_env
  <environment: 0x00000000326b0150>
  
  $labels
  $labels$x
  [1] "Log-Ratio Value"
  
  $labels$y
  [1] "coord"
  
  $labels$xmin
  [1] ".lower"
  
  $labels$xmax
  [1] ".upper"
  
  
  $guides
  $guides$colour
  $title
  [1] "Credible\nInterval"
  
  $title.position
  NULL
  
  $title.theme
  NULL
  
  $title.hjust
  NULL
  
  $title.vjust
  NULL
  
  $label
  [1] TRUE
  
  $label.position
  NULL
  
  $label.theme
  NULL
  
  $label.hjust
  NULL
  
  $label.vjust
  NULL
  
  $keywidth
  NULL
  
  $keyheight
  NULL
  
  $direction
  NULL
  
  $override.aes
  named list()
  
  $nrow
  NULL
  
  $ncol
  NULL
  
  $byrow
  [1] FALSE
  
  $reverse
  [1] FALSE
  
  $order
  [1] 0
  
  $available_aes
  [1] "any"
  
  $name
  [1] "legend"
  
  attr(,"class")
  [1] "guide"  "legend"
  
  
  attr(,"class")
  [1] "gg"     "ggplot"
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 102 ]
  
  == Failed tests ================================================================
  -- Failure (test-pibble.R:60:3): optim sylvester gets same result --------------
  plain > sylv not equal to TRUE.
  1 element mismatch
  
  [ FAIL 1 | WARN 0 | SKIP 0 | PASS 102 ]
  Error: Test failures
  Execution halted