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.47003235 -0.28876383 -0.39656880 -0.45965166  0.64887780 -0.80409441
    [7] -0.34125474 -0.27300113 -1.87464202  0.09420936 -2.28586226 -0.55248768
   [13] -1.52296073  1.12648724 -0.76860834  0.43939831  2.04725056 -1.64296833
   [19]  0.42287618 -1.62506041 -0.25666905  0.69579032 -0.39119571 -0.71421970
   [25] -0.69569727 -0.21960446  0.90962570  1.30165193  0.56078455  0.28413129
   [31]  0.26358158 -1.27629045 -1.69317493 -0.43736898 -0.35557223 -0.30888701
   [37] -0.04028447  0.20638867  1.72103418 -0.04307426 -0.53969709  0.78212345
   [43]  0.13966577  0.57893089  0.18944010 -1.10713732  0.02199583 -0.94694999
   [49] -1.85909265 -0.22223503  0.01823760  0.08312915 -0.12532055 -0.57237942
   [55]  1.84480621 -1.63241977 -1.17142854  1.68317653  0.41002242  0.13225949
   [61]  0.44568288  0.34606880 -0.59424742  0.87597709 -0.84846648 -0.12567407
   [67]  0.74582521 -0.81575360 -0.16093146 -1.22714615 -0.55632111 -1.89726562
   [73] -0.27354480  0.20811665 -0.66582918 -0.11181635 -0.12040132 -0.47125627
   [79]  0.19632896 -0.09858692  0.79038543 -1.23095051 -0.26053609  1.82504858
   [85]  1.23980110  1.48483887 -0.10522046  0.04618805 -0.97281583  0.41835518
   [91]  0.17562377 -0.61447826 -0.64411472 -0.52319898 -0.91242472 -0.99838191
   [97] -0.36970417 -0.62688116  0.02392362  0.31098271
  $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: 0x0000000032a784a0>
  
  $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