tests/testthat/_snaps/alluvial.md

alluvial() returns proper value

list(endpoints = structure(list(x1 = structure(c(1L, 2L, 1L, 
2L, 1L, 2L, 1L, 2L), .Label = c("a", "b"), class = "factor"), 
    x2 = structure(c(1L, 1L, 2L, 2L, 1L, 1L, 2L, 2L), .Label = c("a", 
    "b"), class = "factor"), .bottom = c(0, 0.43, 0.095, 0.62, 
    0, 0.095, 0.335, 0.62), .top = c(0.095, 0.62, 0.38, 1, 0.095, 
    0.285, 0.62, 1), .axis = c(1L, 1L, 1L, 1L, 2L, 2L, 2L, 2L
    )), row.names = c(NA, -8L), class = "data.frame"), category_midpoints = list(
    x1 = structure(c(a = 0.19, b = 0.715), .Dim = 2L, .Dimnames = list(
        c("a", "b"))), x2 = structure(c(a = 0.1425, b = 0.6675
    ), .Dim = 2L, .Dimnames = list(c("a", "b")))), alluvium_midpoints = structure(list(
    x1 = structure(c(1L, 1L, 2L, 2L), .Label = c("a", "b"), class = "factor"), 
    x2 = structure(c(1L, 2L, 1L, 2L), .Label = c("a", "b"), class = "factor"), 
    .axis_from = c(1L, 1L, 1L, 1L), .axis_to = c(2L, 2L, 2L, 
    2L), .x = c(1.5, 1.5, 1.5, 1.5), .y = c(0.0475, 0.3575, 0.3575, 
    0.81), .slope = c(0, 0.266666666666667, -0.372222222222222, 
    0)), row.names = c(NA, -4L), class = "data.frame"))


mbojan/alluvial documentation built on Dec. 28, 2021, 9:30 p.m.