icesAdvice: Functions Related to ICES Advice

gss <- data.frame(
 "5"=c(  15,   56,  303, 1047, 1627,  552, 1480, 2274,  140,  200, 1369, 5299,  2896, 2571,  948,  272, 1328,  503,  526, 2225, 1666, 2360,  781, 6161),
 "6"=c( 116,  298,  894, 2310, 3292, 1616, 5147, 6677, 1084, 1194, 2042, 4377,  6064, 4011, 2722, 3599, 2319, 1576, 3631, 3731, 4151, 4656, 1331, 8981),
 "7"=c( 549,  940, 1008, 1938, 2955, 2584, 7580, 6955, 2223, 2281, 3643, 5040,  9147, 5955, 3810, 4722, 5104, 3595, 3846, 6778, 5676, 6133, 4326, 7209),
 "8"=c(1620, 2447, 1976, 3204, 4105, 3596, 9766, 8672, 3600, 4447, 4388, 9345,  9561, 6882, 6031, 4665, 6500, 6732, 4651, 6517, 9401, 6351, 7605, 6314),
 "9"=c(2204, 3544, 3977, 4341, 4336, 2657, 8552, 7685, 4190, 5841, 5007, 6286, 10031, 6928, 6586, 3586, 5439, 6044, 7141, 6540, 7438, 8134, 8074, 5866),
"10"=c(1983, 3412, 4071, 4903, 4517, 2636, 6063, 4547, 2468, 3950, 5959, 5454,  6435, 7314, 5334, 4561, 6604, 4432, 4342, 5390, 7057, 6084, 7851, 4968),
"11"=c(2355, 3012, 3303, 4084, 3921, 2327, 4762, 3318, 1759, 2728, 3795, 3613,  4865, 4738, 5115, 3293, 4779, 4266, 3533, 3023, 4023, 4118, 7174, 3709),
"12"=c(2882, 3605, 3444, 4551, 3223, 1779, 3371, 2575, 1497, 2203, 1608, 1819,  2695, 3294, 4101, 4695, 4092, 2547, 2263, 1298, 2064, 1609, 3177, 1540),
"13"=c(3167, 2544, 2169, 2985, 2403, 1635, 3044, 1740,  869, 1017, 1180, 1030,  1110, 2475, 4409, 4037, 4776, 1862, 2174,  919, 1483, 1042, 1070,  457),
"14"=c(3240, 2722, 2323, 3528, 2020, 1394, 2345, 1223,  715,  663,  506,  747,   495, 1370, 2767, 3234, 3041, 1491, 1610, 1046,  736, 1376,  955,  667),
"15"=c(2373, 1665, 1469, 2211, 1149,  980, 1512,  921,  396,  287, 1795, 1425,   771,  951, 2345, 2375, 1740,  962, 1227,  637,  624,  286,  491,  130),
"16"=c(2082, 1384, 1221, 2130, 1318,  896, 1187,  422,  252,  117,  131,   57,    84,  493,  974, 1719, 1328,  492,  884,  301,  362,  198,  528,  190),
"17"=c(1507,  976, 1169, 2159,  997,  740, 1074,  333,  275,  125,   35,  244,   100,  166,  642, 1235, 1196,  255,  876,  101,  182,  243,  263,  189),
"18"=c( 899,  582,  652, 1382,  539,  580,  703,  288,  156,   96,   51,   99,    39,  302,  254, 1095,  972,  242,  532,  229,  227,  215,  382,   67),
"19"=c( 890,  466,  483, 1061,  289,  440,  595,  271,  115,   26,    0,   66,     0,  427,  375,  752,  461,  138,  501,  180,  121,  220,  175,  122),
"20"=c( 322,  164,  222,  657,  217,  271,  268,   99,   75,   10,    0,    0,    30,   97,  168,  484,  458,  504,  563,  143,   96,   49,  184,    0),
"21"=c( 646,  331,  445, 1093,  509,  669,  845,  215,  167,   41,   43,    0,     0,  387,  657, 2275,  836,  154,  517,  487,  181,  441,  148,    0),
row.names=1995:2018, check.names=FALSE)