Extract deflection score attributes

Fundamentals, transients, and element-wise deflection.

Usage

get_fundamentals(x)

get_transients(x)

get_element_wise_deflection(x)

get_long_form(x)

Arguments

x

an "event_deflection" object created by the $deflection() method

Value

A data frame containing either fundamentals, transients, or element-wise deflection scores

Examples

act <- interact("indiana2003", list("nc1978", "female"))
#> ✔ dictionary = list(dataset = "indiana2003", group = "all")

grid <- expand.grid(
  A = "girlfriend",
  B = c("help", "retaliate_against", "torment", "interrogate"),
  O = "boyfriend"
)

d <- act$deflection(grid)
d
#> # Event deflection
#> # A data frame: 4 × 4
#>   A          B                 O         deflection
#> * <chr>      <chr>             <chr>          <dbl>
#> 1 girlfriend help              boyfriend       2.48
#> 2 girlfriend retaliate_against boyfriend       9.19
#> 3 girlfriend torment           boyfriend      16.4 
#> 4 girlfriend interrogate       boyfriend       7.35
get_fundamentals(d)
#> # A tibble: 4 × 9
#>      Ae    Ap    Aa    Be    Bp    Ba    Oe    Op    Oa
#>   <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
#> 1  2.46  1.62  1.27  3.00 2.58  1.46   1.72  1.37  1.08
#> 2  2.46  1.62  1.27 -1.33 0.49  0.85   1.72  1.37  1.08
#> 3  2.46  1.62  1.27 -2.54 0.865 0.575  1.72  1.37  1.08
#> 4  2.46  1.62  1.27 -0.77 1.27  1.00   1.72  1.37  1.08
get_transients(d)
#> # A tibble: 4 × 9
#>        Ae    Ap    Aa     Be    Bp    Ba    Oe      Op    Oa
#>     <dbl> <dbl> <dbl>  <dbl> <dbl> <dbl> <dbl>   <dbl> <dbl>
#> 1  2.99    1.51  1.37  2.34  1.66  1.66  1.78   0.477  0.845
#> 2  0.0737  1.29  1.50 -0.911 0.814 1.09  0.796 -0.0678 0.759
#> 3 -0.838   1.57  1.52 -1.84  1.22  0.867 0.470 -0.393  0.735
#> 4  0.386   1.50  1.50 -0.520 1.27  1.21  0.896 -0.0890 0.770
get_element_wise_deflection(d)
#> # A tibble: 4 × 9
#>       Ae      Ap     Aa     Be        Bp     Ba      Oe    Op     Oa
#>    <dbl>   <dbl>  <dbl>  <dbl>     <dbl>  <dbl>   <dbl> <dbl>  <dbl>
#> 1  0.283 0.0116  0.0109 0.435  0.849     0.0374 0.00338 0.797 0.0528
#> 2  5.67  0.108   0.0538 0.172  0.105     0.0586 0.854   2.07  0.100 
#> 3 10.8   0.00206 0.0605 0.484  0.127     0.0855 1.56    3.11  0.116 
#> 4  4.28  0.0138  0.0537 0.0623 0.0000189 0.0434 0.680   2.13  0.0931
get_long_form(d)
#> # A tibble: 36 × 9
#>    A          B     O     id    dim   fundamentals transients deflections entity
#>    <chr>      <chr> <chr> <chr> <chr>        <dbl>      <dbl>       <dbl> <chr> 
#>  1 girlfriend help  boyf… A     e             2.46     2.99       0.283   girlf…
#>  2 girlfriend help  boyf… A     p             1.62     1.51       0.0116  girlf…
#>  3 girlfriend help  boyf… A     a             1.27     1.37       0.0109  girlf…
#>  4 girlfriend help  boyf… B     e             3.00     2.34       0.435   help  
#>  5 girlfriend help  boyf… B     p             2.58     1.66       0.849   help  
#>  6 girlfriend help  boyf… B     a             1.46     1.66       0.0374  help  
#>  7 girlfriend help  boyf… O     e             1.72     1.78       0.00338 boyfr…
#>  8 girlfriend help  boyf… O     p             1.37     0.477      0.797   boyfr…
#>  9 girlfriend help  boyf… O     a             1.08     0.845      0.0528  boyfr…
#> 10 girlfriend reta… boyf… A     e             2.46     0.0737     5.67    girlf…
#> # ℹ 26 more rows