R version 2.13.0 (2011-04-13) Copyright (C) 2011 The R Foundation for Statistical Computing ISBN 3-900051-07-0 Platform: i486-pc-linux-gnu (32-bit) R is free software and comes with ABSOLUTELY NO WARRANTY. You are welcome to redistribute it under certain conditions. Type 'license()' or 'licence()' for distribution details. R is a collaborative project with many contributors. Type 'contributors()' for more information and 'citation()' on how to cite R or R packages in publications. Type 'demo()' for some demos, 'help()' for on-line help, or 'help.start()' for an HTML browser interface to help. Type 'q()' to quit R. > x <- array(list(12.4 + ,0.25 + ,4.1 + ,0.25 + ,3.2 + ,0.25 + ,5 + ,0.25 + ,3.4 + ,1.5 + ,4.5 + ,1.5 + ,4.5 + ,1.5 + ,3.3 + ,1.5 + ,1.5 + ,1.5 + ,4.9 + ,1.5 + ,5.4 + ,1.5 + ,1.5 + ,1.5 + ,8.8 + ,1.5 + ,8 + ,2.5 + ,1.5 + ,6 + ,5.3 + ,0.87 + ,6.1 + ,1.4 + ,7.5 + ,1.9 + ,1.5 + ,1.93 + ,22.1 + ,2.17 + ,4.6 + ,2.36 + ,1.5 + ,2.87 + ,7.1 + ,3.2 + ,3.4 + ,3.3 + ,1.5 + ,3.35 + ,5.9 + ,3.43 + ,3.6 + ,4.37 + ,1.5 + ,5 + ,4.1 + ,9.43 + ,1.5 + ,11.7 + ,3.4 + ,43.9 + ,1.5 + ,8.2 + ,5.9 + ,1.5 + ,3.9 + ,1.5 + ,1.5 + ,1.5 + ,4.2 + ,1.5 + ,3.7 + ,1.5 + ,1.5 + ,7.9 + ,7.9 + ,10.6 + ,1.5 + ,6 + ,4.5 + ,1.5 + ,4.4 + ,3.3 + ,8.7 + ,2.5 + ,4.8 + ,7.1 + ,3.7 + ,3.3 + ,1.5 + ,2.5 + ,3.4 + ,1.5 + ,6.1 + ,1.5 + ,1.5 + ,1.5 + ,3.9 + ,4 + ,3.3 + ,4.5 + ,5.6 + ,5.7 + ,1.5 + ,6.4 + ,2.5 + ,4.7 + ,1.5 + ,4.4 + ,4.4 + ,1.5 + ,1.5 + ,4.4 + ,4.6 + ,17.7 + ,5 + ,1.5 + ,5.1 + ,7.8 + ,5.6 + ,3.3 + ,1.5 + ,1.5 + ,3.3 + ,6.3 + ,3.8 + ,1.5 + ,5.1 + ,8.6 + ,1.5 + ,6.9 + ,4.7 + ,3.2 + ,3.7 + ,4.4 + ,5.3 + ,1.5 + ,4 + ,4.3 + ,1.5 + ,1.5 + ,1.5 + ,1.5 + ,4.2 + ,2.5 + ,8.8 + ,6.2 + ,5 + ,4.4 + ,9.5 + ,3.7 + ,7.8 + ,3.9 + ,1.5 + ,13.7 + ,1.5 + ,8 + ,6.9 + ,6.1 + ,4.2 + ,5.7 + ,4.2 + ,3.9 + ,9 + ,9 + ,3.4 + ,5.6 + ,6.3 + ,11.8 + ,3.8 + ,9.7 + ,14.8 + ,3.7 + ,1.5 + ,3.8 + ,1.5 + ,4.7 + ,4.2 + ,7 + ,11.1 + ,1.5 + ,1.5 + ,4.4 + ,3.6 + ,6 + ,1.5 + ,8.1 + ,1.5 + ,1.5 + ,4.1 + ,10 + ,4.5 + ,3.4 + ,5 + ,4.5 + ,6.9 + ,3.8 + ,1.5 + ,3.4 + ,4.8 + ,9.6 + ,3.1 + ,7.4 + ,4.3 + ,3 + ,10.7 + ,11 + ,6.7 + ,3.9 + ,11.7 + ,3.4 + ,3.5 + ,11.6 + ,4.1 + ,5 + ,4.3 + ,3.4 + ,6.9 + ,4 + ,4.7 + ,5.7 + ,3.5 + ,1.5 + ,6.6 + ,3.5 + ,5.6 + ,11 + ,1.5 + ,3.3 + ,3.4 + ,3.2 + ,4.2 + ,5.9 + ,6.6 + ,8.3 + ,7.5 + ,1.5 + ,6 + ,3.1 + ,3.8 + ,9.8 + ,3.6 + ,5.5 + ,6.9 + ,5.1 + ,8.6 + ,5.1 + ,5.3 + ,4.4 + ,4.1 + ,1.5 + ,4.1 + ,5 + ,3 + ,3.6 + ,131 + ,3.4 + ,3.4 + ,9.5 + ,6.4 + ,4 + ,21.2 + ,1.5 + ,1.5 + ,4.5 + ,7.8 + ,3.3 + ,4.3 + ,1.5 + ,1.5 + ,4 + ,7.2 + ,3.4 + ,1.5 + ,4.1 + ,7.5 + ,4.8 + ,3 + ,6.6 + ,4.2 + ,9.5 + ,4.7 + ,1.5 + ,5.7 + ,9.1 + ,3.9 + ,1.5 + ,4.2 + ,4.9 + ,6.3 + ,3.8 + ,8.4 + ,3.4 + ,5.4 + ,1.5 + ,14.8 + ,3.6 + ,5.4 + ,4.7 + ,3.2 + ,1.5 + ,8.5 + ,19.7 + ,3.1 + ,5.8 + ,3.9 + ,6.3 + ,3.8 + ,4.4 + ,5.2 + ,4.8 + ,1.5 + ,4.4 + ,1.5 + ,12.3 + ,4.8 + ,4.6 + ,5.4 + ,1.5 + ,4.3 + ,9.2 + ,6.4 + ,4.3 + ,6.5 + ,4.8 + ,7.9 + ,1.5 + ,37.6 + ,5.1 + ,5.9 + ,4.4 + ,4.1 + ,7.2 + ,7.4 + ,7 + ,3.9 + ,4.1 + ,3.5 + ,12.9 + ,1.5 + ,6.4 + ,3.7 + ,6.7 + ,3.5 + ,1.5 + ,6.8 + ,21 + ,4.4 + ,5.4 + ,5.2 + ,3.5 + ,4.9 + ,1.5 + ,9.1 + ,3.2 + ,5.3 + ,5.6 + ,2.5 + ,4.9 + ,3.5 + ,7.2 + ,1.5 + ,3.9 + ,9.9 + ,1.5 + ,6.1 + ,4.4 + ,3.5 + ,7.1 + ,3.7 + ,3.9 + ,8.2 + ,9 + ,106 + ,3.9 + ,1.5 + ,4.4 + ,4.8 + ,5.7 + ,8.5 + ,1.5 + ,5.1 + ,13.5 + ,5.9 + ,4.3 + ,15.1 + ,7.8 + ,6.7 + ,5.3 + ,15.2 + ,6.5 + ,28.6 + ,7.7 + ,9.5 + ,3.5 + ,8 + ,3.5 + ,2.5 + ,9.8 + ,9.3 + ,5.5 + ,5.1 + ,25.6 + ,7.7 + ,4.7 + ,10.5 + ,4 + ,5.1 + ,5.5 + ,13.2 + ,7.3 + ,11.7 + ,9.6 + ,6 + ,5.6 + ,5.6 + ,9.6 + ,6.1 + ,6.6 + ,12 + ,7.2 + ,4.2 + ,8.6 + ,24.9 + ,6.7 + ,9.1 + ,9 + ,7.9 + ,5.6 + ,8.8 + ,1.5 + ,8.3 + ,19.7 + ,12.5 + ,34.1 + ,5.4 + ,5.3 + ,5.8 + ,8 + ,76.4 + ,5.5 + ,9.8 + ,3.1 + ,13.1 + ,8.8 + ,7.1 + ,7 + ,3.7 + ,6.6 + ,4.5 + ,13.8 + ,3.6 + ,1.5 + ,25.1 + ,20.1 + ,9.1 + ,17.2 + ,3.7 + ,25.5 + ,16 + ,38.4 + ,13.4 + ,16.1 + ,8.1 + ,23.5 + ,3.7 + ,7.7 + ,1.5 + ,16.7 + ,1.5 + ,34.6 + ,3.3 + ,10.8 + ,1.5 + ,5.8 + ,9.2 + ,1.5 + ,5 + ,4.7 + ,3.4 + ,7.2 + ,7.6 + ,6 + ,3.7 + ,16.3 + ,5.6 + ,6.6 + ,25.2 + ,1.5 + ,7.8 + ,1.5 + ,7.1 + ,5.9 + ,15.2 + ,8.1 + ,6.3 + ,11.1 + ,3.1 + ,12.8 + ,9.5 + ,9.8 + ,1.5 + ,6.6 + ,10.4 + ,9.3 + ,6.6 + ,5.9 + ,12.1 + ,13.6 + ,12 + ,10.8 + ,10 + ,3.7 + ,3.1 + ,9.8 + ,10.2 + ,4.6 + ,8.7 + ,14.9 + ,7.3 + ,16.4 + ,15 + ,18 + ,8.6 + ,7.1 + ,5.8 + ,33.7 + ,1.5 + ,10 + ,9.1 + ,16 + ,9.4 + ,10.3 + ,12.2 + ,10 + ,12.3 + ,10 + ,8.9 + ,5 + ,1.36 + ,1.31 + ,1.15 + ,1.1 + ,1.17 + ,1.01 + ,1.24 + ,1.38 + ,1.02 + ,3.1 + ,8.67 + ,1.22 + ,0.25 + ,1.26 + ,2.2 + ,1.17 + ,1.07 + ,1.12 + ,2.29 + ,1.47 + ,0.25 + ,1.62 + ,5.48 + ,8.61 + ,1.1 + ,1.95 + ,1.97 + ,1.46 + ,8.66 + ,1.28 + ,1.79 + ,2.37 + ,3.26 + ,5.86 + ,5.81 + ,5.07 + ,8.64 + ,8.51 + ,1.63 + ,2.88 + ,1.74 + ,0.25 + ,2.04 + ,4.44 + ,2.03 + ,13.2 + ,2.63 + ,2.93 + ,3.51 + ,2.17 + ,1.97 + ,2.44 + ,3.87 + ,0.84 + ,1.84 + ,1.22 + ,1.5 + ,1.75 + ,2 + ,2.65 + ,2.82 + ,2.18 + ,8.64 + ,2.32 + ,2.82 + ,2.18 + ,2.03 + ,1.77 + ,12.5 + ,2.08 + ,6.46 + ,8.72 + ,8.45 + ,0.81 + ,4.45 + ,6.66 + ,0.25 + ,0.25 + ,0.25 + ,1.38 + ,4.1 + ,2.24 + ,5.51 + ,5.73 + ,4.75 + ,9.14 + ,9.15 + ,10.5 + ,2.28 + ,1.25 + ,3.01 + ,1.75 + ,1.44 + ,2.45 + ,1.4 + ,5.87 + ,2.17 + ,7.09 + ,1.39 + ,4.78 + ,5.19 + ,2.31 + ,1.57 + ,5.56 + ,5.5 + ,0.25 + ,1.63 + ,4.22 + ,1.53 + ,1.62 + ,1.38 + ,2.6 + ,2.8 + ,2.81 + ,3.14 + ,7.63 + ,8.73 + ,9.12 + ,1.55 + ,2.36 + ,2.26 + ,2.9 + ,0.25 + ,1.83 + ,2.31 + ,1.5 + ,14.2 + ,2.63 + ,7.28 + ,1.53 + ,3.19 + ,3.91 + ,7 + ,10.5 + ,8.92 + ,0.86 + ,1.37 + ,5.43 + ,1.41 + ,1.35 + ,1.88 + ,2.97 + ,5.48 + ,0.25 + ,1.43 + ,2.21 + ,1.5 + ,4.69 + ,1.76 + ,1.87 + ,3.79 + ,2.27 + ,1.89 + ,3.12 + ,5.06 + ,3.94 + ,4.47 + ,1.5 + ,2.15 + ,2.1 + ,1.69 + ,3.1 + ,3.25 + ,4.75 + ,0.81 + ,3.75 + ,2.21 + ,3.07 + ,9.47 + ,10.3 + ,8.95 + ,0.25 + ,3.04 + ,1.45 + ,1.7 + ,1.78 + ,5.83 + ,6.28 + ,0.71 + ,0.25 + ,3.78 + ,2.34 + ,2.09 + ,2.37 + ,3.93 + ,1.82 + ,1.89 + ,8.74 + ,9.33 + ,1.56 + ,3.17 + ,4.46 + ,1.99 + ,1.85 + ,4.33 + ,1.65 + ,1.49 + ,1.52 + ,1.98 + ,1.75 + ,1.93 + ,2.52 + ,2.14 + ,4.43 + ,1.84 + ,1.55 + ,1.38 + ,2.43 + ,4.22 + ,1.95 + ,3.5 + ,2.24 + ,2.89 + ,1.89 + ,4 + ,1.72 + ,2.65 + ,10.2 + ,9.05 + ,6.34 + ,2.14 + ,0.25 + ,1.93 + ,1.93 + ,3.22 + ,1.55 + ,5.42 + ,4.74 + ,2.95 + ,4.38 + ,7.05 + ,6.89 + ,2.43 + ,2.29 + ,0.25 + ,0.25 + ,1.48 + ,3.86 + ,1.91 + ,3.32 + ,1.96 + ,4.74 + ,21 + ,3.73 + ,2.47 + ,2.02 + ,5.11 + ,3.44 + ,3.63 + ,3.47 + ,5.46 + ,3.91 + ,4.18 + ,1.52 + ,7.15 + ,2.35 + ,4.9 + ,1.8 + ,0.25 + ,0.25 + ,1.49 + ,2.12 + ,2.79 + ,3.06 + ,4.97 + ,5.07 + ,1.61 + ,3.52 + ,9.86 + ,3.03 + ,1.94 + ,4.73 + ,3.76 + ,5.25 + ,2.35 + ,1.93 + ,2.51 + ,2.74 + ,0.25 + ,3.93 + ,2.42 + ,7.49 + ,14.1 + ,2.11 + ,15.5 + ,3.71 + ,2.03 + ,2.2 + ,3.08 + ,1.99 + ,2.5 + ,10.2 + ,15.1 + ,2.49 + ,1.19 + ,1.65 + ,2.16 + ,4.93 + ,3.01 + ,1.45 + ,1.6 + ,1.58 + ,3.59 + ,1.61 + ,1.92 + ,1.51 + ,1.67 + ,2.47 + ,5.77 + ,5.77 + ,9.06 + ,1.88 + ,3.16 + ,3.69 + ,3.66 + ,1.91 + ,6.19 + ,3.52 + ,5.05 + ,9.28 + ,3.1 + ,3.62 + ,1.86 + ,1.48 + ,1.27 + ,2.18 + ,1.88 + ,1.94 + ,2.4 + ,3.94 + ,3.52 + ,2.36 + ,1.05 + ,0.55 + ,1.33 + ,2.08 + ,2.91 + ,1.72 + ,1.71 + ,3.34 + ,3.09 + ,2.96 + ,2.8 + ,2.75 + ,2.61 + ,8.66 + ,9.45 + ,8.98 + ,6.87 + ,3.18 + ,1.32 + ,1.74 + ,1.99 + ,2.07 + ,2.89 + ,3.22 + ,0.25 + ,1.12 + ,1.56 + ,1.34 + ,1.68 + ,1.42 + ,2.15 + ,2.45 + ,8.12 + ,2.37 + ,6.01 + ,8.84 + ,5.24 + ,5.56 + ,4.51 + ,9.97 + ,8.03 + ,9.49 + ,10.1 + ,1.75 + ,1.11 + ,3.35 + ,1.9 + ,1.82 + ,2.63 + ,0.25 + ,2.83 + ,4.43 + ,1.37 + ,1.6 + ,3.03 + ,2.7 + ,2.98 + ,11.6 + ,5.52 + ,8.64 + ,8.14 + ,13.2 + ,1.98 + ,1.72 + ,2.06 + ,1.68 + ,1.95 + ,2.16 + ,0.25 + ,1.98 + ,2.54 + ,3.3 + ,3.53 + ,3.33 + ,3.48 + ,2.86 + ,3.13 + ,5.3 + ,1.51 + ,1.47 + ,6.26 + ,1.38 + ,1.75 + ,2.86 + ,17.6 + ,2.5 + ,0.25 + ,1.73 + ,3.15 + ,3.68 + ,4.12 + ,4.42 + ,2.73 + ,2.26 + ,7.37 + ,12.5 + ,8.56 + ,2.17 + ,1.36 + ,2.39 + ,1.88 + ,2.07 + ,2.07 + ,2.61 + ,1.79 + ,1.84 + ,3.67 + ,3.79 + ,1.92 + ,3.54 + ,7.38 + ,18.1 + ,1.77 + ,4.85 + ,5.13 + ,2.6 + ,2.4 + ,1.3 + ,1.43 + ,2.85 + ,3.47 + ,4.99 + ,5.16 + ,7.13 + ,5.45 + ,1.91 + ,2.19 + ,3 + ,1.92 + ,9.9 + ,8.64 + ,1.31 + ,2.52 + ,2.21 + ,2.8 + ,1.61 + ,1.74 + ,1.57 + ,2.17 + ,1.39 + ,2.77 + ,2.53 + ,5.38 + ,4.48 + ,2.59 + ,5.57 + ,4.52 + ,1.7 + ,1.49 + ,1.94 + ,2.41 + ,2.28 + ,3.29 + ,2.42 + ,2.57 + ,2.74 + ,5.4 + ,0.25 + ,0.25 + ,1.26 + ,3.85 + ,3.53 + ,3.42 + ,22.1 + ,8.07 + ,2.55 + ,4.72 + ,4.18 + ,18.4 + ,1.29 + ,1.55 + ,2.22 + ,3.22 + ,2.21 + ,0.65 + ,1.79 + ,2.36 + ,4.07 + ,3.06 + ,7.45 + ,3.05 + ,9.54 + ,3.63 + ,2.94 + ,6.19 + ,6.2 + ,9.8 + ,10.9 + ,1.94 + ,1.22 + ,8.07 + ,3.11 + ,2.24 + ,8 + ,1.74 + ,2.01 + ,1.97 + ,2.89 + ,3.28 + ,4.56 + ,6.76 + ,3.18 + ,4.28 + ,3.47 + ,2.02 + ,1.85 + ,1.49 + ,1.72 + ,3.34 + ,3.67 + ,4.87 + ,1.58 + ,2.2 + ,3.25 + ,3.21 + ,1.96 + ,0.25 + ,3.9 + ,5.15 + ,2.13 + ,3.07 + ,2.23 + ,6.18 + ,4.96 + ,5.25 + ,3.72 + ,2.64 + ,10 + ,11.2 + ,3.81 + ,2.56 + ,2.91 + ,2.47 + ,2.64 + ,1.96 + ,2.22 + ,1.74 + ,2.3 + ,3.48 + ,2.61 + ,9.79 + ,4.99 + ,3.48 + ,8.48 + ,9.37 + ,1.89 + ,3.45 + ,0.25 + ,2.38 + ,1.65 + ,2.69 + ,2.22 + ,2.25 + ,2.14 + ,2.74 + ,3.11 + ,2.99 + ,2.51 + ,9.21 + ,4.77 + ,3.84 + ,8.03 + ,4.69 + ,7.58 + ,10.6 + ,1.89 + ,1.76 + ,1.83 + ,3.38 + ,2.13 + ,2.73 + ,10 + ,0.25 + ,2.35 + ,2.52 + ,2.22 + ,3.25 + ,9.67 + ,7.56 + ,2.82 + ,18.5 + ,3.06 + ,3.09 + ,2.56 + ,7.8 + ,7.7 + ,7.52 + ,1.81 + ,3.59 + ,1.9 + ,2.17 + ,2.79 + ,0.62 + ,2.43 + ,7.45 + ,2.58 + ,6.9 + ,2.34 + ,2.35 + ,2.71 + ,2.68 + ,2.03 + ,5.75 + ,2.51 + ,7.8 + ,4.6 + ,2.68 + ,9.52 + ,3.71 + ,1.92 + ,2.2 + ,0.66 + ,3.64 + ,2.59 + ,1.78 + ,4.84 + ,2.95 + ,3.07 + ,12.2 + ,2.06 + ,1.83 + ,3.32 + ,8.04 + ,3.39 + ,2.09 + ,2 + ,1.89 + ,2.89 + ,3.19 + ,2.95 + ,4.08 + ,2.38 + ,2.93 + ,8.57 + ,10.4 + ,2.27 + ,3.02 + ,3.03 + ,2.4 + ,12 + ,4.25 + ,2.83 + ,2.82 + ,3.79 + ,1.96 + ,2.77 + ,1.67 + ,2.92 + ,3.03 + ,4.29 + ,3.06 + ,4.02 + ,4.65 + ,8.18 + ,4.86 + ,9.39 + ,0.99 + ,2.13 + ,2.41 + ,2.85 + ,3.98 + ,2.74 + ,1.06 + ,2.69 + ,1.93 + ,2.37 + ,1.83 + ,21.6 + ,16.7 + ,2.29 + ,2.34 + ,2.35 + ,2.34 + ,2.24 + ,3.58 + ,2.6 + ,7.64 + ,5.06 + ,10.8 + ,3.05 + ,2.3 + ,2.47 + ,2.24 + ,2.3 + ,2.36 + ,3.19 + ,3.63 + ,1.72 + ,3.01 + ,2.39 + ,2.53 + ,9.92 + ,4.79 + ,2.37 + ,2.98 + ,5.3 + ,5.01 + ,9.85 + ,0.25 + ,1.47 + ,10.7 + ,3.68 + ,8.58 + ,7.46 + ,1.47 + ,1.7 + ,5.43 + ,11.7 + ,3.13 + ,3.12 + ,4.24 + ,0.25 + ,3.01 + ,1.93 + ,5.74 + ,5.02 + ,8.95 + ,1.88 + ,2.5 + ,2.85 + ,2.69 + ,5.81 + ,2.04 + ,3.18 + ,3.31 + ,3.34 + ,4.81 + ,4.39 + ,2.24 + ,3.56 + ,3.77 + ,3.27 + ,2.16 + ,0.25 + ,1.83 + ,10.4 + ,5 + ,1.95 + ,8.6 + ,3.76 + ,5.14 + ,7.62 + ,2.14 + ,2.35 + ,5.14 + ,4.32 + ,1.89 + ,3.17 + ,6.14 + ,2.45 + ,1.5 + ,1.55 + ,10.3 + ,2.76 + ,3.95 + ,3.66 + ,2.98 + ,13.5 + ,8.9 + ,4.21 + ,1.77 + ,1.42 + ,3 + ,3.98 + ,2.42 + ,2.01 + ,2.91 + ,5.92 + ,0.25 + ,5.88 + ,0.25 + ,6.03 + ,3.46 + ,2.04 + ,2.55 + ,1.97 + ,1.72 + ,5.21 + ,2.46 + ,2.28 + ,1.63 + ,2.31 + ,2.09 + ,4.29 + ,2.18 + ,8.9 + ,8.67 + ,4.21 + ,1.51 + ,2.13 + ,2.6 + ,1.49 + ,1.99 + ,8.62 + ,1.57 + ,1.66 + ,0.25 + ,9.58 + ,9.63 + ,2.54 + ,9.16 + ,2.54 + ,9.7 + ,2.05 + ,5.21 + ,2.07 + ,4.53 + ,2.21 + ,2.35 + ,5.18 + ,2.22 + ,1.73 + ,1.57 + ,5.45 + ,2.53 + ,1.77 + ,2.72 + ,2.52 + ,1.4 + ,2.43 + ,7.57 + ,2.29 + ,4.86 + ,2.82 + ,2.58 + ,2.72 + ,4.12 + ,4.11 + ,20.9 + ,2.78 + ,2.03 + ,2.14 + ,8.19 + ,2.61 + ,5.29 + ,2.13 + ,5.42 + ,1.71 + ,2.78 + ,2.32 + ,13.3 + ,1.98 + ,2.12 + ,1.83 + ,2.32 + ,2.29 + ,6.29 + ,10.8) + ,dim=c(2 + ,1389) + ,dimnames=list(c('pment' + ,'nopment') + ,1:1389)) > y <- array(NA,dim=c(2,1389),dimnames=list(c('pment','nopment'),1:1389)) > for (i in 1:dim(x)[1]) + { + for (j in 1:dim(x)[2]) + { + y[i,j] <- as.numeric(x[i,j]) + } + } > par3 = '2' > par2 = '1' > par1 = 'two.sided' > #'GNU S' R Code compiled by R2WASP v. 1.0.44 () > #Author: Dr. Ian E. Holliday > #To cite this work: Ian E. Holliday, 2009, YOUR SOFTWARE TITLE (vNUMBER) in Free Statistics Software (v$_version), Office for Research Development and Education, URL http://www.wessa.net/rwasp_YOURPAGE.wasp/ > #Source of accompanying publication: > #Technical description: > par2 <- as.numeric(par2) > par3 <- as.numeric(par3) > x <- t(y) > > #Note: the /var/wessaorg/rcomp/createtable file can be downloaded at http://www.wessa.net/cretab > load(file="/var/wessaorg/rcomp/createtable") > > a<-table.start() > a <- table.row.start(a) > a <- table.element(a,'Kolmogorov_Smirnov Test',3,TRUE) > a <- table.row.end(a) > a <- table.row.start(a) > a <- table.element(a,'',1,TRUE) > a <- table.element(a,'Statistic',1,TRUE) > a <- table.element(a,'P-value',1,TRUE) > a <- table.row.end(a) > D <- ks.test(x[,par2],x[,par3],alternative=par1) Warning message: In ks.test(x[, par2], x[, par3], alternative = par1) : cannot compute correct p-values with ties > a<-table.row.start(a) > a<-table.element(a,'K-S Test',1,TRUE) > a<-table.element(a,round(D$statistic[[1]], digits=5) ) > a<-table.element(a,round(D$p.value, digits =5) ) > a<-table.row.end(a) > a<-table.end(a) > table.save(a,file="/var/wessaorg/rcomp/tmp/1qm351315000118.tab") > a<-table.start() > a <- table.row.start(a) > a <- table.element(a,'Means of Data Distributions ',3,TRUE) > a <- table.row.end(a) > a <- table.row.start(a) > a <- table.element(a,'Mean 1',1,TRUE) > a <- table.element(a,'Mean 2',1,TRUE) > a <- table.element(a,'Difference',1,TRUE) > a <- table.row.end(a) > a<-table.row.start(a) > a<-table.element(a,round(mean(x[,par2]), digits=5),1) > a<-table.element(a,round(mean(x[,par3]), digits=5),1) > a<-table.element(a,round( (mean(x[,par2])- mean(x[,par3])), digits=5),1) > a<-table.row.end(a) > a<-table.end(a) > table.save(a,file="/var/wessaorg/rcomp/tmp/2wxu41315000118.tab") > > > > proc.time() user system elapsed 0.706 0.042 0.740