library(magrittr)
# Make a lookup of text names to integers
tags <- c('H1-00', 'H1-01')
tags <- structure(seq_along(tags), names = tags)
# prey_a can have any of these tags
prey_a <- g3_stock('prey_a', seq(1, 10)) %>% g3s_tag(tags)
# Use stock_instance to see what the array would look like
g3_stock_instance(prey_a)
Run the code above in your browser using DataLab