R/paralist.R

In NMADiagT: Network Meta-Analysis of Multiple Diagnostic Tests

paralist = function(para,summ){
  name = rownames(summ[[1]])
  paraname = NULL
  index = list()
  for (i in 1:length(para)){
    index=grep(para[i],name)
    paraname = c(paraname,name[index])
  }
  return(paraname)
}