diff --git a/R/cosine.R b/R/cosine.R index cbea9e3..1e6ecc4 100644 --- a/R/cosine.R +++ b/R/cosine.R @@ -311,6 +311,8 @@ multi_connection_table <- function(ids, partners=c("inputs", "outputs"), check_missing=TRUE, min_datasets=Inf ) { + if(isTRUE(group)) + group='type' partners=match.arg(partners, several.ok = T) kk=keys(ids) if(length(partners)>1) {