Skip to contents

Print Permutation Test Results

Usage

# S3 method for class 'tna_permutation'
print(x, ...)

Arguments

x

A tna_permutation object.

...

Additional arguments passed to the tibble print method.

Value

x (invisibly).

Examples

model_x <- tna(group_regulation[1:200, ])
model_y <- tna(group_regulation[1001:1200, ])
# Small number of iterations for CRAN
perm <- permutation_test(model_x, model_y, iter = 20)
print(perm)
#> Edges
#> 
#> # A tibble: 81 × 4
#>    edge_name           diff_true effect_size p_value
#>    <chr>                   <dbl>       <dbl>   <dbl>
#>  1 adapt -> adapt       0            NaN        1   
#>  2 cohesion -> adapt    0.00541        0.927    0.8 
#>  3 consensus -> adapt  -0.000679      -0.192    0.85
#>  4 coregulate -> adapt  0.00769        0.510    0.55
#>  5 discuss -> adapt    -0.130         -6.84     0   
#>  6 emotion -> adapt     0.0101         1.88     0.15
#>  7 monitor -> adapt    -0.00480       -0.483    0.95
#>  8 plan -> adapt        0.00339        1.42     0   
#>  9 synthesis -> adapt  -0.159         -2.06     0   
#> 10 adapt -> cohesion   -0.0907        -1.17     0.2 
#> # ℹ 71 more rows