Added code to creat_map_table function to return plot order as an additional variable in the data frame created from function