R/get_all_comparison_mat.R

Defines functions get_all_comparison_mat

get_all_comparison_mat <- function(deltas, comparisons, comps, mean_comps) {
  
  n_delta <- length(deltas)
  poss_comps0 <- create_comparison_matrix(comparisons, comps, mean_comps)
  
  poss_comps <- NULL
  for(d in 1:n_delta) {
    poss_comps <- rbind(poss_comps, poss_comps0)
  }
  
  return(poss_comps)
  
}

Try the codaredistlm package in your browser

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

codaredistlm documentation built on Dec. 23, 2022, 1:29 a.m.