check_unsystematic {beezdiscounting} | R Documentation |
Check for Unsystematic Data Violations
Description
This function checks a dataset for violations of two criteria commonly used to identify unsystematic delay-discounting data:
Criterion 1: Any subsequent value of
y
exceeds the previous value by more than a specified proportion of the larger later reward (ll
).Criterion 2: The last value of
y
is not at least a specified proportion less than the first value ofy
.
Usage
check_unsystematic(dat, ll = 1, c1 = 0.2, c2 = 0.1)
Arguments
dat |
A data frame containing the delay-discounting data. It must have at least two columns:
|
ll |
A numeric value representing the larger later reward. Default is 1. |
c1 |
A numeric value for the threshold proportion for Criterion 1. Default is 0.2. |
c2 |
A numeric value for the threshold proportion for Criterion 2. Default is 0.1. |
Value
A tibble with the following columns:
-
id
: The unique identifier for the data set. -
c1_pass
: Logical value indicating whether Criterion 1 was passed. -
c2_pass
: Logical value indicating whether Criterion 2 was passed.
Examples
data <- tibble::tibble(
id = c(rep("P1", 6)),
x = c(1, 7, 30, 90, 180, 365), # delays
y = c(0.9, 0.5, 0.3, 0.2, 0.1, 0.05) # indifference points
)
check_unsystematic(data, ll = 1, c1 = 0.2, c2 = 0.1)