Continue with 90 subset

[tungufoss]

FYI - I took the first run for 90mm subset 1 - and took the last press (i.e. 8), and press 5 (because this is a bad press, and has only one very large item). All items that were in the previous subset get priority assigned - to showcase that functionality.

The code snipped I use to merge the first and second run was:

old <- read_csv('data/v1.2/soln_ES_d90_1.csv') %>%
  filter(k %in% c(4, 7)) %>%
  filter(type == 'item') %>%
  rename(width = w, layers = h) %>%
  group_by(order, width, layers) %>%
  summarise(quantity = n()) %>%
  ungroup() %>%
  mutate(priority = 1, depth = 90, height = 45 * layers) %>%
  select(order, depth, width, height, layers, quantity, priority) %>%
  ungroup()

new <- read_csv('data/subset/glulam_d90_p2.csv') %>%
  rbind(old) %>%  
  mutate(depth = 91)

new %>%
  write_csv('data/subset/glulam_d91_p2.csv')

The resulting data file is data/subset/glulam_d91_p2.csv