Cued Recall Example"

knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

Libraries and Data

Please see manuscript for a long description of the following data. We will load the example data, and you can use the ? with the dataset name to learn more about the data.

library(lrd)
data("cued_recall_manuscript")
head(cued_recall_manuscript)
#?cued_recall_manuscript

Data Cleanup

Scoring in lrd is case sensitive, so we will use tolower() to lower case all correct answers and participant answers.

cued_recall_manuscript$Target <- tolower(cued_recall_manuscript$Target)
cued_recall_manuscript$Answer <- tolower(cued_recall_manuscript$Answer)

Score the Data

You should define the following:

Note that the answer key can be in a separate dataframe, use something like answer_key$answer for the key argument and answer_key$id_num for the trial number. Fill in answer_key with your dataframe name and the column name for those columns after the $.

cued_output <- prop_correct_cued(data = cued_recall_manuscript,
                                 responses = "Answer",
                                 key = "Target",
                                 key.trial = "Trial_num",
                                 id = "Sub.ID",
                                 id.trial = "Trial_num",
                                 cutoff = 1,
                                 flag = TRUE,
                                 group.by = NULL)

str(cued_output)

Output

We can use DF_Scored to see the original dataframe with our new scored column - also to check if our answer key and participant answers matched up correctly! The DF_Participant can be used to view a participant level summary of the data. Last, if a grouping variable is used, we can use DF_Group to see that output.

#Overall
cued_output$DF_Scored

#Participant
cued_output$DF_Participant


Try the lrd package in your browser

Any scripts or data that you put into this service are public.

lrd documentation built on Dec. 9, 2021, 5:06 p.m.