Extract layout parameters from a comparison summary row

Converts one row of the summary data frame returned by compare.layouts into a named list of parameters suitable for passing to grip or back into a compare.layouts(candidates = ...) call.

Usage

params.from.summary(summary.row)

Arguments

summary.row

A one-row data frame (or the first row is used) from the $summary element of compare.layouts().

Value

A named list with elements placement, rounds, final_rounds, num_init, num_nbrs, r, s, repulsion_factor, tinit_factor, and optionally preset (included only when the summary row records a non-empty preset).

Examples

edges <- edges.path(5)
cmp <- compare.layouts(edges, n = 5, dim = 2,
                            candidates = "default",
                            seeds = 1L)
params <- params.from.summary(cmp$summary[1, ])
coords <- do.call(
  grip,
  c(list(edges = edges, n = 5, dim = 2, seed = 42L), params)
)
round(coords, 2)
#>        [,1]  [,2]
#> [1,]  31.76  0.24
#> [2,]  13.26 -0.33
#> [3,]  -6.74 -0.90
#> [4,] -27.06 -1.42
#> [5,] -45.11 -1.84