```r}} current_concept <- {{x}} current_name <- meas_dq$concept_name[meas_dq$concept_id == current_concept] target_col <- meas_dq$target_column[meas_dq$concept_id == current_concept]
curr_title <- stringr::str_sub(current_name, 1, 30) if (nchar(curr_title) >= 30) { curr_title <- paste0(curr_title, "...") } ```
r paste0(current_concept, ": ", curr_title)
This data item is off the current roadmap.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.