From 6608d9acf886f039cbc926a98a5653c5a0526373 Mon Sep 17 00:00:00 2001 From: Gregory Jefferis Date: Thu, 11 Jul 2024 19:09:03 +0100 Subject: [PATCH] fix: pass on rootid argument for cave tables --- R/cave-tables.R | 11 ++++------- 1 file changed, 4 insertions(+), 7 deletions(-) diff --git a/R/cave-tables.R b/R/cave-tables.R index 2ba3790..4396b5b 100644 --- a/R/cave-tables.R +++ b/R/cave-tables.R @@ -118,8 +118,7 @@ banc_cell_info <- function(rootids = NULL, rawcoords = FALSE){ #' @rdname banc_cave_tables #' @export banc_cell_ids <- function(rootids = NULL){ - table <- "cell_ids" - get_cave_table_data(table) + get_cave_table_data('cell_ids', rootids) } #' @rdname banc_cave_tables @@ -127,21 +126,19 @@ banc_cell_ids <- function(rootids = NULL){ banc_neck_connective_neurons <- function(rootids = NULL, table = c("neck_connective_y92500", "neck_connective_y121000")){ table <- match.arg(table) - get_cave_table_data(table) + get_cave_table_data(table, rootids) } #' @rdname banc_cave_tables #' @export banc_peripheral_nerves <- function(rootids = NULL){ - table <- "peripheral_nerves" - get_cave_table_data(table) + get_cave_table_data("peripheral_nerves", rootids) } #' @rdname banc_cave_tables #' @export banc_backbone_proofread <- function(rootids = NULL){ - table <- "backbone_proofread" - get_cave_table_data(table) + get_cave_table_data("backbone_proofread", rootids) } # hidden