README.md

In unmnn/charitemisc: Miscellaneous Helper Functions For The Charité Tinnitus Data

charitemisc

Miscellaneous helper functions for the Charité tinnitus data.

Important: The data themselves (data/charite.rda) are not uploaded to GitHub due to copyright reasons.

Installation

remotes::install_github("unmnn/charitemisc")

Usage

library(charitemisc)
library(dplyr)
library(purrr)
data_dict

## # A tibble: 380 x 4
##    item      label        description                           values  
##    <chr>     <chr>        <chr>                                 <list>  
##  1 .age      age          patient age                           <NULL>  
##  2 .jour_nr  .jour_nr     patient ID                            <NULL>  
##  3 .group    .group       meta: group                           <NULL>  
##  4 .phase    .phase       phase                                 <chr [3~
##  5 .phase_s~ .phase_seq   chronological sequence of phases for~ <NULL>  
##  6 .testdat~ Date         testing date                          <NULL>  
##  7 .day      testing_day  testing date: day of the month        <NULL>  
##  8 .weekday  testing_wee~ testing date: day of the week         <NULL>  
##  9 .yearday  testing_yea~ testing date: day of the year         <NULL>  
## 10 .week     testing_week testing date: calendar week           <NULL>  
## # ... with 370 more rows

var <- "adsl_adsl01"
data_dict %>% filter(item == var) %>% pull(description)

## [1] "\"During the past week I was bothered by things that usually don't bother me.\""

data_dict %>% filter(item == var) %>% pluck("values", 1)

##              0              1              2              3 
##       "rarely"    "sometimes" "occasionally"       "mostly"

unmnn/charitemisc documentation built on Dec. 17, 2020, 9:28 a.m.