Skip to content

Commit

Permalink
specify the select and matches function coming from dplyr
Browse files Browse the repository at this point in the history
  • Loading branch information
gederajeg committed Feb 2, 2019
1 parent b4447aa commit 00cf116
Showing 1 changed file with 3 additions and 1 deletion.
4 changes: 3 additions & 1 deletion R/kappa_tidy.R
Original file line number Diff line number Diff line change
Expand Up @@ -11,6 +11,8 @@
#' @return A tibble/data frame
#'
#' @importFrom tibble enframe
#' @importFrom dplyr matches
#' @importFrom dplyr select
#' @importFrom purrr map_dbl
#' @importFrom purrr map_int
#' @importFrom purrr map
Expand Down Expand Up @@ -71,7 +73,7 @@ kappa_tidy <- function(

# codes for processing the kappa values per synonyms
df_split <- split(df, df[[split_by]])
df_split <- purrr::map(df_split, function(df) select(df, matches(var_names)))
df_split <- purrr::map(df_split, function(df) dplyr::select(df, dplyr::matches(var_names)))
irr_res <- purrr::map(df_split, function(df) irr::kappa2(df))
irr_res <- tibble::enframe(irr_res)

Expand Down

0 comments on commit 00cf116

Please sign in to comment.