eventreport (version 0.1.1)

event_level_disagreement: Calculate event-level disagreement scores by variable (wide format)

Description

This function calculates the level of disagreement across event reports for each event and variable. For a given event and variable, it computes 1 minus the proportion of reports that agree with the modal value. A score of 0 indicates full agreement, while higher scores indicate greater disagreement.

Usage

event_level_disagreement(data, group_var, variables)

Value

A wide-format tibble where each row is an event and each column is a disagreement score for a variable.

Arguments

data

A data frame containing event report level data.

group_var

A character string naming the column that uniquely identifies events (e.g., "event_id").

variables

A character vector of column names to check for disagreement.

Details

The result is a wide-format tibble with one row per event and one column per variable.

Examples

df <- data.frame(
  event_id = c(1, 1, 2, 2, 3),
  actor1 = c("Actor A", "Actor B", "Actor B", "Actor B", "Actor C"),
  deaths_best = c(10, 10, 5, 15, 10)
)
event_level_disagreement(
  df,
  group_var = "event_id",
  variables = c("actor1", "deaths_best")
)