diff --git a/R/utilities.R b/R/utilities.R
index 110044c..798686d 100644
--- a/R/utilities.R
+++ b/R/utilities.R
@@ -32,7 +32,7 @@ get_BiGG <- function(address){
     mutate(obj_coef = coalesce(.data$objective_coefficient, 0))
   
   res$mets <- json_mod$metabolites %>%
-    select(met = id)
+    select(met = .data$id)
   
   res$stoich <- json_mod$reactions$metabolites %>%
     mutate(abbreviation = json_mod$reactions$id) %>%