/* Creates Color Scatterplots (XY graphs) */ data mydata; input State $ YEAR $ VAR1 VAR2 ; cards; AK 2001 0.0044 5.3 AK 2002 0.0037 5.266666667 AK 2003 0.0053 5.466666667 AK 2004 0.0047 4.666666667 AK 2005 0.0053 3.566666667 AK 2006 0.0045 3.4 AK 2007 0.0071 3.7 AK 2008 0.0122 6.5 AK 2009 0.0218 10.4 AK 2010 0.021 9.1 AL 2001 0.0113 6.3 AL 2002 0.0122 7.433333333 AL 2003 0.0164 7.6 AL 2004 0.0202 7.233333333 AL 2005 0.0189 7 AL 2006 0.0139 6.233333333 AL 2007 0.0183 6.2 AL 2008 0.0245 6.7 AL 2009 0.0386 8.2 AL 2010 0.036 7.9 AR 2001 0.011 5.533333333 AR 2002 0.0111 5.9 AR 2003 0.0164 5.433333333 AR 2004 0.0202 4.633333333 AR 2005 0.0185 4.6 AR 2006 0.0135 3.9 AR 2007 0.0148 4.033333333 AR 2008 0.02 7.433333333 AR 2009 0.0294 10.36666667 AR 2010 0.0266 9.666666667 AZ 2001 0.0081 5.1 AZ 2002 0.0088 5.333333333 AZ 2003 0.011 5.833333333 AZ 2004 0.0115 5.5 AZ 2005 0.0076 4.966666667 AZ 2006 0.0071 5.233333333 AZ 2007 0.0199 5.2 AZ 2008 0.0514 6.033333333 AZ 2009 0.0966 7.8 AZ 2010 0.083 7.9 CA 2001 0.0055 6.233333333 CA 2002 0.0049 6.8 CA 2003 0.0048 6.7 CA 2004 0.004 5.9 CA 2005 0.0036 5.2 CA 2006 0.007 4.833333333 CA 2007 0.0252 5.733333333 CA 2008 0.0547 8.633333333 CA 2009 0.0961 12.16666667 CA 2010 0.0807 12.5 CO 2001 0.0052 5.266666667 CO 2002 0.0069 5.666666667 CO 2003 0.0101 6 CO 2004 0.012 5.466666667 CO 2005 0.0131 4.9 CO 2006 0.016 3.966666667 CO 2007 0.0224 3.966666667 CO 2008 0.0267 5.833333333 CO 2009 0.0399 8.6 CO 2010 0.0368 8.9 CT 2001 0.0051 3.433333333 CT 2002 0.0061 5.066666667 CT 2003 0.0066 5.3 CT 2004 0.0077 4.8 CT 2005 0.0076 4.8 CT 2006 0.0093 4.466666667 CT 2007 0.0159 4.866666667 CT 2008 0.0242 6.433333333 CT 2009 0.046 8.9 CT 2010 0.0482 9.066666667 DC 2001 0.0098 3.6 DC 2002 0.0095 3.9 DC 2003 0.0133 3.833333333 DC 2004 0.0111 3.966666667 DC 2005 0.0075 3.933333333 DC 2006 0.0072 3.4 DC 2007 0.0154 3.733333333 DC 2008 0.0296 6.233333333 DC 2009 0.051 8.566666667 DC 2010 0.0509 8.433333333 DE 2001 0.0093 6.566666667 DE 2002 0.0106 6.766666667 DE 2003 0.0152 7 DE 2004 0.0172 7.266666667 DE 2005 0.0164 6 DE 2006 0.0122 5.533333333 DE 2007 0.0182 5.5 DE 2008 0.028 7.7 DE 2009 0.0501 10.33333333 DE 2010 0.0539 9.666666667 FL 2001 0.0089 5.966666667 FL 2002 0.0105 5.5 FL 2003 0.0124 4.933333333 FL 2004 0.0128 4.466666667 FL 2005 0.0101 3.466666667 FL 2006 0.0099 3.433333333 FL 2007 0.0318 4.566666667 FL 2008 0.0756 7.666666667 FL 2009 0.1325 11.06666667 FL 2010 0.1311 11.9 GA 2001 0.0097 4.466666667 GA 2002 0.0121 4.833333333 GA 2003 0.0181 4.4 GA 2004 0.0208 5.1 GA 2005 0.0217 5.1 GA 2006 0.0175 4.566666667 GA 2007 0.0241 5.033333333 GA 2008 0.0363 7.633333333 GA 2009 0.0627 10.4 GA 2010 0.0583 10.36666667 HI 2001 0.0073 4.966666667 HI 2002 0.0074 3.666666667 HI 2003 0.0061 3.8 HI 2004 0.0051 3.033333333 HI 2005 0.0039 2.666666667 HI 2006 0.0048 2.3 HI 2007 0.01 2.933333333 HI 2008 0.0202 5.233333333 HI 2009 0.0454 6.966666667 HI 2010 0.0478 6.4 IA 2001 0.0061 5.133333333 IA 2002 0.0078 5.4 IA 2003 0.0099 5.033333333 IA 2004 0.0112 4.233333333 IA 2005 0.0126 3.4 IA 2006 0.0112 2.733333333 IA 2007 0.0159 3.2 IA 2008 0.0188 5.933333333 IA 2009 0.0268 8.666666667 IA 2010 0.0255 9.633333333 ID 2001 0.0084 6 ID 2002 0.0099 6.6 ID 2003 0.0111 6.633333333 ID 2004 0.0117 6.133333333 ID 2005 0.0112 5.466666667 ID 2006 0.0072 4.433333333 ID 2007 0.0122 5.466666667 ID 2008 0.0221 7.233333333 ID 2009 0.0449 11 ID 2010 0.0408 9.4 IL 2001 0.0083 5.066666667 IL 2002 0.0095 4.933333333 IL 2003 0.0114 5.266666667 IL 2004 0.0137 5.433333333 IL 2005 0.013 5.266666667 IL 2006 0.012 4.833333333 IL 2007 0.0188 4.666666667 IL 2008 0.0298 7.533333333 IL 2009 0.054 10.6 IL 2010 0.0545 9.6 IN 2001 0.0105 3.6 IN 2002 0.014 4.066666667 IN 2003 0.0185 4.533333333 IN 2004 0.0224 4.666666667 IN 2005 0.024 4.1 IN 2006 0.0201 3.6 IN 2007 0.0264 3.866666667 IN 2008 0.0311 4.8 IN 2009 0.0424 6 IN 2010 0.0376 6.166666667 KS 2001 0.0061 4.733333333 KS 2002 0.0072 5.1 KS 2003 0.0114 5.666666667 KS 2004 0.0126 5.433333333 KS 2005 0.0138 4.9 KS 2006 0.0114 4.3 KS 2007 0.0135 4.066666667 KS 2008 0.0167 5.233333333 KS 2009 0.0259 7.333333333 KS 2010 0.025 6.866666667 KY 2001 0.0098 5.9 KY 2002 0.0111 5.8 KY 2003 0.0147 6.133333333 KY 2004 0.0164 5.366666667 KY 2005 0.0175 6.2 KY 2006 0.015 5.7 KY 2007 0.0193 5.6 KY 2008 0.0228 7.933333333 KY 2009 0.0317 10.96666667 KY 2010 0.0299 10.23333333 LA 2001 0.0112 5.833333333 LA 2002 0.0135 5.966666667 LA 2003 0.0178 5.8 LA 2004 0.0227 5.4 LA 2005 0.0198 9.333333333 LA 2006 0.0151 3.9 LA 2007 0.02 3.7 LA 2008 0.0252 5.266666667 LA 2009 0.0411 7.1 LA 2010 0.0411 7.7 MA 2001 0.0029 4.133333333 MA 2002 0.0033 4.633333333 MA 2003 0.0039 5 MA 2004 0.0051 4.7 MA 2005 0.0055 4.9 MA 2006 0.0085 4.766666667 MA 2007 0.0163 4.833333333 MA 2008 0.0259 6.433333333 MA 2009 0.0429 8.333333333 MA 2010 0.0409 7.533333333 MD 2001 0.0105 4.466666667 MD 2002 0.011 4.4 MD 2003 0.0128 4.366666667 MD 2004 0.0132 4.3 MD 2005 0.0097 3.9 MD 2006 0.0074 3.8 MD 2007 0.0153 3.6 MD 2008 0.0339 5.5 MD 2009 0.0596 7.566666667 MD 2010 0.0586 7.4 ME 2001 0.0053 4.5 ME 2002 0.0054 5.566666667 ME 2003 0.0074 5.7 ME 2004 0.0078 4.933333333 ME 2005 0.0078 4.9 ME 2006 0.0097 4.7 ME 2007 0.016 4.4 ME 2008 0.023 6.333333333 ME 2009 0.0348 8.8 ME 2010 0.0371 8.3 MI 2001 0.0073 6 MI 2002 0.0094 6.233333333 MI 2003 0.0121 6.966666667 MI 2004 0.0152 7.2 MI 2005 0.0177 6.7 MI 2006 0.018 7 MI 2007 0.0259 7.266666667 MI 2008 0.0323 9.966666667 MI 2009 0.0517 13.9 MI 2010 0.0438 11.36666667 MN 2001 0.0045 4.366666667 MN 2002 0.0046 4.433333333 MN 2003 0.0065 4.933333333 MN 2004 0.0072 4.433333333 MN 2005 0.0086 4.2 MN 2006 0.011 4.3 MN 2007 0.0179 4.7 MN 2008 0.0248 6.3 MN 2009 0.0384 7.9 MN 2010 0.033 6.966666667 MO 2001 0.0085 6.766666667 MO 2002 0.0092 6.666666667 MO 2003 0.0119 5.866666667 MO 2004 0.0135 7.1 MO 2005 0.0145 8.833333333 MO 2006 0.0124 6.6 MO 2007 0.0167 6.133333333 MO 2008 0.0219 7.533333333 MO 2009 0.0339 10.66666667 MO 2010 0.0301 10.2 MS 2001 0.0128 4.9 MS 2002 0.0176 5.2 MS 2003 0.0293 5.5 MS 2004 0.0337 5.933333333 MS 2005 0.0308 5.066666667 MS 2006 0.0206 4.9 MS 2007 0.0262 5.366666667 MS 2008 0.0339 7.2 MS 2009 0.0483 9.7 MS 2010 0.0449 9.6 MT 2001 0.0063 4.5 MT 2002 0.0072 4.3 MT 2003 0.0084 4.233333333 MT 2004 0.0085 3.866666667 MT 2005 0.0073 3.466666667 MT 2006 0.0052 3.1 MT 2007 0.0086 3.566666667 MT 2008 0.0145 5.266666667 MT 2009 0.0287 6.9 MT 2010 0.0283 7.4 NC 2001 0.0096 3.466666667 NC 2002 0.0136 3.7 NC 2003 0.0189 3.933333333 NC 2004 0.0219 4 NC 2005 0.0218 3.666666667 NC 2006 0.0151 3 NC 2007 0.0179 2.933333333 NC 2008 0.025 3.633333333 NC 2009 0.0419 5 NC 2010 0.0418 4.366666667 ND 2001 0.0047 6.066666667 ND 2002 0.0053 5.533333333 ND 2003 0.0062 5.033333333 ND 2004 0.0053 4.266666667 ND 2005 0.0058 4.3 ND 2006 0.0057 4.233333333 ND 2007 0.0075 4.9 ND 2008 0.0087 8.7 ND 2009 0.0131 14.3 ND 2010 0.0126 14.9 NE 2001 0.0053 4 NE 2002 0.0057 4.633333333 NE 2003 0.0112 4.3 NE 2004 0.012 3.6 NE 2005 0.0119 3.633333333 NE 2006 0.0107 3.633333333 NE 2007 0.0139 3.4 NE 2008 0.0156 4.533333333 NE 2009 0.0207 6.7 NE 2010 0.0201 5.666666667 NH 2001 0.0035 5.133333333 NH 2002 0.0031 5.9 NH 2003 0.0038 5.6 NH 2004 0.0044 4.5 NH 2005 0.0058 4.666666667 NH 2006 0.0075 4.4 NH 2007 0.0134 4.466666667 NH 2008 0.02 6.533333333 NH 2009 0.034 9.7 NH 2010 0.0321 9.166666667 NJ 2001 0.006 5.166666667 NJ 2002 0.0075 5.7 NJ 2003 0.0092 5.966666667 NJ 2004 0.0114 5.566666667 NJ 2005 0.01 4.8 NJ 2006 0.009 3.7 NJ 2007 0.0165 3.433333333 NJ 2008 0.0295 5.4 NJ 2009 0.0582 7.9 NJ 2010 0.0638 8.6 NM 2001 0.0096 5.833333333 NM 2002 0.012 6.2 NM 2003 0.0152 6.366666667 NM 2004 0.0162 5.3 NM 2005 0.0147 5.066666667 NM 2006 0.0105 4.333333333 NM 2007 0.0139 4.7 NM 2008 0.0218 6.3 NM 2009 0.0396 8.9 NM 2010 0.0406 8.266666667 NV 2001 0.0123 6.6 NV 2002 0.0129 6.433333333 NV 2003 0.013 6.133333333 NV 2004 0.0117 5.333333333 NV 2005 0.0079 5.066666667 NV 2006 0.0112 4.766666667 NV 2007 0.0339 4.933333333 NV 2008 0.0695 7.866666667 NV 2009 0.1411 11.2 NV 2010 0.1335 9.833333333 NY 2001 0.0063 3.033333333 NY 2002 0.0073 3.566666667 NY 2003 0.0097 3.533333333 NY 2004 0.0111 3.566666667 NY 2005 0.0107 3.4 NY 2006 0.0103 3.233333333 NY 2007 0.017 3.1 NY 2008 0.0284 3.533333333 NY 2009 0.0503 4.2 NY 2010 0.0552 3.866666667 OH 2001 0.009 5.133333333 OH 2002 0.0125 5.766666667 OH 2003 0.0178 6.033333333 OH 2004 0.0229 6.166666667 OH 2005 0.0238 5.6 OH 2006 0.0216 5.433333333 OH 2007 0.028 5.7 OH 2008 0.0307 7.666666667 OH 2009 0.042 10.6 OH 2010 0.0395 9.6 OK 2001 0.0093 4.5 OK 2002 0.0123 5.1 OK 2003 0.016 5.466666667 OK 2004 0.0185 4.8 OK 2005 0.0188 4.2 OK 2006 0.0152 4.166666667 OK 2007 0.0191 3.733333333 OK 2008 0.0227 4.366666667 OK 2009 0.0324 7.233333333 OK 2010 0.0325 6.866666667 OR 2001 0.0066 7.533333333 OR 2002 0.0068 7.6 OR 2003 0.0085 7.866666667 OR 2004 0.0098 6.866666667 OR 2005 0.0089 5.866666667 OR 2006 0.0056 5.266666667 OR 2007 0.0095 5.266666667 OR 2008 0.0198 8.433333333 OR 2009 0.0418 11 OR 2010 0.0411 10.6 PA 2001 0.0089 5.266666667 PA 2002 0.0104 5.666666667 PA 2003 0.015 5.533333333 PA 2004 0.0192 5.266666667 PA 2005 0.0194 4.8 PA 2006 0.0148 4.366666667 PA 2007 0.0175 4.533333333 PA 2008 0.0233 6.2 PA 2009 0.0351 8.6 PA 2010 0.0352 8.5 RI 2001 0.0055 4.666666667 RI 2002 0.006 5.266666667 RI 2003 0.0056 5.433333333 RI 2004 0.0059 5.033333333 RI 2005 0.006 5.2 RI 2006 0.0104 4.9 RI 2007 0.0203 5.866666667 RI 2008 0.0279 9 RI 2009 0.0501 11.7 RI 2010 0.0505 11.5 SC 2001 0.0113 5.833333333 SC 2002 0.0168 6.2 SC 2003 0.0241 6.766666667 SC 2004 0.0282 6.9 SC 2005 0.0266 6.8 SC 2006 0.0201 6.2 SC 2007 0.0219 5.566666667 SC 2008 0.0299 8.6 SC 2009 0.0508 11.76666667 SC 2010 0.0503 10.9 SD 2001 0.0043 3.4 SD 2002 0.0047 3.266666667 SD 2003 0.0063 3.6 SD 2004 0.0078 3.8 SD 2005 0.0087 3.5 SD 2006 0.0072 3.133333333 SD 2007 0.0101 2.866666667 SD 2008 0.0128 3.733333333 SD 2009 0.0189 5.1 SD 2010 0.0171 4.666666667 TN 2001 0.0113 5.533333333 TN 2002 0.0128 5.133333333 TN 2003 0.0205 5.7 TN 2004 0.0253 5.666666667 TN 2005 0.0248 5.4 TN 2006 0.0156 4.833333333 TN 2007 0.0199 5.333333333 TN 2008 0.0263 7.866666667 TN 2009 0.0382 10.53333333 TN 2010 0.0357 9.4 TX 2001 0.0095 5.8 TX 2002 0.0111 6.533333333 TX 2003 0.0161 6.5 TX 2004 0.0201 5.833333333 TX 2005 0.0193 5.2 TX 2006 0.0168 4.6 TX 2007 0.0219 4.4 TX 2008 0.0265 5.733333333 TX 2009 0.0404 8.1 TX 2010 0.0377 8.266666667 UT 2001 0.0109 5.066666667 UT 2002 0.0135 5.8 UT 2003 0.0163 5.433333333 UT 2004 0.0182 4.7 UT 2005 0.0152 3.866666667 UT 2006 0.0088 2.6 UT 2007 0.0122 2.933333333 UT 2008 0.0212 4.8 UT 2009 0.0462 7.666666667 UT 2010 0.044 7.533333333 VA 2001 0.0067 3.633333333 VA 2002 0.0069 4.4 VA 2003 0.008 4.333333333 VA 2004 0.0084 3.566666667 VA 2005 0.0076 3.7 VA 2006 0.007 3.9 VA 2007 0.0136 4.033333333 VA 2008 0.0238 5.266666667 VA 2009 0.0394 6.7 VA 2010 0.033 5.833333333 VT 2001 0.0039 4 VT 2002 0.0031 4.1 VT 2003 0.006 3.9 VT 2004 0.0062 3.6 VT 2005 0.006 3.3 VT 2006 0.0065 3.033333333 VT 2007 0.0083 3.233333333 VT 2008 0.0133 4.866666667 VT 2009 0.0214 7.133333333 VT 2010 0.023 6.633333333 WA 2001 0.0068 7 WA 2002 0.0073 7.2 WA 2003 0.008 7.133333333 WA 2004 0.0092 5.9 WA 2005 0.0081 5.266666667 WA 2006 0.0063 4.9 WA 2007 0.01 4.7 WA 2008 0.0182 6.633333333 WA 2009 0.0399 9.9 WA 2010 0.0445 9.333333333 WI 2001 0.0047 5.3 WI 2002 0.0057 5.933333333 WI 2003 0.0079 5.566666667 WI 2004 0.0089 5.033333333 WI 2005 0.0092 4.666666667 WI 2006 0.0094 4.433333333 WI 2007 0.0151 4.166666667 WI 2008 0.0201 4.866666667 WI 2009 0.0321 8.6 WI 2010 0.0299 9.6 WV 2001 0.0096 5 WV 2002 0.0106 5.3 WV 2003 0.0142 5.4 WV 2004 0.0167 4.9 WV 2005 0.0145 4.8 WV 2006 0.0115 4.766666667 WV 2007 0.0142 4.6 WV 2008 0.0188 5.933333333 WV 2009 0.0256 9.1 WV 2010 0.0246 7.6 WY 2001 0.0067 4 WY 2002 0.0065 4.3 WY 2003 0.0097 4.3 WY 2004 0.0086 3.8 WY 2005 0.0069 3.6 WY 2006 0.007 2.933333333 WY 2007 0.0106 2.633333333 WY 2008 0.0141 3.8 WY 2009 0.0258 7.7 WY 2010 0.0265 6.5 ; run; ods PDF file="c:\scatterplot.pdf" notoc; data mydata; set mydata; goodstates=1; if state in ('AL','TN','FL','GA','SC') then goodstates=0; run; ods exclude none; /* Set the graphics environment */ goptions reset=all cback=white border htitle=12pt htext=10pt; /* Define the title */ title1 "Scatter Plot by Year with an Overall Regression Line"; /* Define the axis characteristics */ axis1 label=("VARIABLE 2"); axis2 label=(angle=90 "VAR1") minor=(n=4); /* Define the symbol characteristics for the scatter plot groups */ symbol1 interpol=none value=dot color=depk h=1; symbol2 interpol=none value=dot color=vibg h=1; symbol3 interpol=none value=dot color=black h=1 ; symbol4 interpol=none value=dot color=purple h=1; symbol5 interpol=none value=dot color=green h=1; symbol6 interpol=none value=dot color=red h=1; symbol7 interpol=none value=dot color=blue h=1; symbol8 interpol=none value=dot color=yellow h=1; symbol9 interpol=none value=dot color=orange h=1; symbol10 interpol=none value=dot color=brown h=1; /* Define the symbol characteristics for the regression line */ symbol11 interpol=rl value=none color=black; /* Define the legend options */ legend1 frame label=none repeat=1 value=("2001" "2002" "2003" "2004" "2005" "2006" "2007" "2008" "2009" "2010"); axis1 label=("Variable 2"); axis2 label=(angle=90 "VAR1") minor=(n=4); proc gplot data=mydata; plot VAR1*VAR2=YEAR / haxis=axis1 vaxis=axis2 legend=legend1; plot2 VAR1*VAR2 / noaxis; run; quit; /* Showing State groupings */ /* Define the legend options */ goptions reset=all cback=white border htitle=12pt htext=10pt; symbol1 interpol=none value=dot color=red h=1; symbol2 interpol=none value=dot color=blue h=1; symbol11 interpol=rl value=none color=black; legend1 frame label=none repeat=1 value=("Problem (Southern States)" "Good (All Others)"); axis1 label=("VAR2"); axis2 label=(angle=90 "VAR1") minor=(n=4); title1 Showing State groups; proc gplot data=mydata; plot VAR1*VAR2=goodstates / haxis=axis1 vaxis=axis2 legend=legend1; plot2 VAR1*VAR2 / noaxis; run; quit; ods pdf close;