data one;
input loc $ yr sp $ ntrt $ rep yld;
cards;
EFAW	2012	MIX	N225	1	12847
EFAW	2012	MIX	LEG	1	14636
EFAW	2012	MIX	N0	1	17238
EFAW	2012	MIX	N150	1	15449
EFAW	2012	MIX	N75	1	18051
EFAW	2012	SWG	N150	1	17726
EFAW	2012	SWG	LEG	1	19678
EFAW	2012	SWG	N75	1	18539
EFAW	2012	SWG	N225	1	15775
EFAW	2012	SWG	N0	1	18702
EFAW	2012	HBS	N0	1	18490
EFAW	2012	HBS	N150	1	27906
EFAW	2012	HBS	N75	1	24572
EFAW	2012	HBS	N225	1	26670
EFAW	2012	HBS	LEG	1	25760
EFAW	2012	HBS	N150	2	22149
EFAW	2012	HBS	N225	2	25158
EFAW	2012	HBS	N0	2	29728
EFAW	2012	HBS	N75	2	32574
EFAW	2012	HBS	LEG	2	20588
EFAW	2012	SWG	LEG	2	20653
EFAW	2012	SWG	N75	2	21304
EFAW	2012	SWG	N150	2	19678
EFAW	2012	SWG	N225	2	19352
EFAW	2012	SWG	N0	2	18377
EFAW	2012	MIX	N150	2	17889
EFAW	2012	MIX	N75	2	14961
EFAW	2012	MIX	N0	2	11872
EFAW	2012	MIX	LEG	2	10245
EFAW	2012	MIX	N225	2	11384
EFAW	2012	MIX	N75	3	16262
EFAW	2012	MIX	LEG	3	17726
EFAW	2012	MIX	N150	3	15287
EFAW	2012	MIX	N0	3	18377
EFAW	2012	MIX	N225	3	16750
EFAW	2012	HBS	N0	3	17157
EFAW	2012	HBS	N150	3	25776
EFAW	2012	HBS	N225	3	27223
EFAW	2012	HBS	LEG	3	19612
EFAW	2012	HBS	N75	3	24036
EFAW	2012	SWG	N150	3	8456
EFAW	2012	SWG	N75	3	10408
EFAW	2012	SWG	N225	3	12522
EFAW	2012	SWG	N0	3	13335
EFAW	2012	SWG	LEG	3	10571
EFAW	2011	MIX	N225	1	1593
EFAW	2011	MIX	LEG	1	3562
EFAW	2011	MIX	N0	1	2812
EFAW	2011	MIX	N150	1	4117
EFAW	2011	MIX	N75	1	4060
EFAW	2011	SWG	N150	1	9584
EFAW	2011	SWG	LEG	1	5431
EFAW	2011	SWG	N75	1	6516
EFAW	2011	SWG	N225	1	3865
EFAW	2011	SWG	N0	1	8168
EFAW	2011	HBS	N0	1	5991
EFAW	2011	HBS	N150	1	4776
EFAW	2011	HBS	N75	1	3466
EFAW	2011	HBS	N225	1	2856
EFAW	2011	HBS	LEG	1	2775
EFAW	2011	HBS	N150	2	2260
EFAW	2011	HBS	N225	2	4913
EFAW	2011	HBS	N0	2	7554
EFAW	2011	HBS	N75	2	8399
EFAW	2011	HBS	LEG	2	3500
EFAW	2011	SWG	LEG	2	6433
EFAW	2011	SWG	N75	2	2770
EFAW	2011	SWG	N150	2	9506
EFAW	2011	SWG	N225	2	2882
EFAW	2011	SWG	N0	2	5500
EFAW	2011	MIX	N150	2	5150
EFAW	2011	MIX	N75	2	4073
EFAW	2011	MIX	N0	2	4613
EFAW	2011	MIX	LEG	2	2200
EFAW	2011	MIX	N225	2	2401
EFAW	2011	MIX	N75	3	4915
EFAW	2011	MIX	LEG	3	4985
EFAW	2011	MIX	N150	3	4961
EFAW	2011	MIX	N0	3	3781
EFAW	2011	MIX	N225	3	3238
EFAW	2011	HBS	N0	3	6243
EFAW	2011	HBS	N150	3	1658
EFAW	2011	HBS	N225	3	2658
EFAW	2011	HBS	LEG	3	1024
EFAW	2011	HBS	N75	3	1223
WODW	2012	MIX	N225	1	2195
WODW	2012	MIX	LEG	1	1464
WODW	2012	MIX	N0	1	1789
WODW	2012	MIX	N150	1	3822
WODW	2012	MIX	N75	1	2927
WODW	2012	SWG	N150	1	2765
WODW	2012	SWG	LEG	1	2195
WODW	2012	SWG	N75	1	1545
WODW	2012	SWG	N225	1	2277
WODW	2012	SWG	N0	1	2277
WODW	2012	SWG	LEG	2	2277
WODW	2012	SWG	N75	2	3496
WODW	2012	SWG	N150	2	3252
WODW	2012	SWG	N225	2	3822
WODW	2012	SWG	N0	2	3090
WODW	2012	MIX	N150	2	2195
WODW	2012	MIX	N75	2	2358
WODW	2012	MIX	N0	2	1382
WODW	2012	MIX	LEG	2	1626
WODW	2012	MIX	N225	2	2602
WODW	2012	MIX	N75	3	1870
WODW	2012	MIX	LEG	3	1057
WODW	2012	MIX	N150	3	1870
WODW	2012	MIX	N0	3	1789
WODW	2012	MIX	N225	3	3252
WODW	2012	SWG	N150	3	2521
WODW	2012	SWG	N75	3	2521
WODW	2012	SWG	N225	3	2114
WODW	2012	SWG	N0	3	1382
WODW	2012	SWG	LEG	3	1220
WODW	2011	MIX	N225	1	1435
WODW	2011	MIX	LEG	1	1615
WODW	2011	MIX	N0	1	1686
WODW	2011	MIX	N150	1	2368
WODW	2011	MIX	N75	1	1650
WODW	2011	SWG	N150	1	2260
WODW	2011	SWG	LEG	1	2081
WODW	2011	SWG	N75	1	1471
WODW	2011	SWG	N225	1	1220
WODW	2011	SWG	N0	1	1005
WODW	2011	SWG	LEG	2	1435
WODW	2011	SWG	N75	2	1435
WODW	2011	SWG	N150	2	2009
WODW	2011	SWG	N225	2	2153
WODW	2011	SWG	N0	2	1650
WODW	2011	MIX	N150	2	1328
WODW	2011	MIX	N75	2	1041
WODW	2011	MIX	N0	2	969
WODW	2011	MIX	LEG	2	1650
WODW	2011	MIX	N225	2	2189
WODW	2011	MIX	N75	3	1076
WODW	2011	MIX	LEG	3	718
WODW	2011	MIX	N150	3	718
WODW	2011	MIX	N0	3	538
WODW	2011	MIX	N225	3	1076
WODW	2011	SWG	N150	3	861
WODW	2011	SWG	N75	3	1076
WODW	2011	SWG	N225	3	1363
WODW	2011	SWG	N0	3	1292
WODW	2011	SWG	LEG	3	1292
data two; set one; proc sort; by yr loc;
proc print;
proc glm; by yr loc;
class rep sp ntrt;
model yld = rep sp rep*sp ntrt sp*ntrt;
test h = rep sp e = rep*sp;
means sp ntrt sp*ntrt; 
run;