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(50 + ,148 + ,47 + ,148 + ,50 + ,160 + ,55 + ,150 + ,52 + ,152 + ,51 + ,150 + ,47 + ,150 + ,45 + ,152 + ,39 + ,157 + ,41 + ,153 + ,52 + ,159 + ,52 + ,153 + ,45 + ,157 + ,45 + ,153 + ,52 + ,158 + ,51 + ,155 + ,44 + ,157 + ,44 + ,155 + ,55 + ,160 + ,55 + ,155 + ,59 + ,159 + ,59 + ,155 + ,53 + ,158 + ,50 + ,155 + ,50 + ,158 + ,49 + ,155 + ,53 + ,161 + ,54 + ,158 + ,51 + ,161 + ,52 + ,158 + ,54 + ,160 + ,55 + ,158 + ,75 + ,162 + ,75 + ,158 + ,63 + ,160 + ,64 + ,158 + ,56 + ,160 + ,53 + ,158 + ,59 + ,157 + ,55 + ,158 + ,53 + ,162 + ,52 + ,158 + ,51 + ,156 + ,51 + ,158 + ,58 + ,161 + ,51 + ,159 + ,63 + ,163 + ,59 + ,159 + ,56 + ,163 + ,57 + ,159 + ,52 + ,163 + ,57 + ,160 + ,58 + ,166 + ,60 + ,160 + ,54 + ,164 + ,53 + ,160 + ,60 + ,162 + ,59 + ,160 + ,57 + ,163 + ,59 + ,160 + ,57 + ,162 + ,56 + ,160 + ,56 + ,165 + ,57 + ,160 + ,47 + ,163 + ,47 + ,160 + ,45 + ,163 + ,45 + ,160 + ,53 + ,164 + ,51 + ,160 + ,53 + ,162 + ,53 + ,160 + ,52 + ,163 + ,53 + ,160 + ,47 + ,162 + ,47 + ,160 + ,48 + ,163 + ,44 + ,160 + ,51 + ,163 + ,50 + ,160 + ,54 + ,161 + ,54 + ,160 + ,63 + ,165 + ,59 + ,160 + ,56 + ,162 + ,56 + ,160 + ,52 + ,164 + ,52 + ,161 + ,64 + ,164 + ,62 + ,161 + ,50 + ,166 + ,50 + ,161 + ,56 + ,161 + ,56 + ,161 + ,56 + ,163 + ,58 + ,161 + ,62 + ,164 + ,61 + ,161 + ,166 + ,57 + ,56 + ,163 + ,56 + ,165 + ,57 + ,163 + ,64 + ,165 + ,63 + ,163 + ,55 + ,165 + ,54 + ,163 + ,61 + ,165 + ,60 + ,163 + ,60 + ,167 + ,55 + ,163 + ,55 + ,164 + ,55 + ,163 + ,59 + ,166 + ,55 + ,163 + ,62 + ,168 + ,62 + ,163 + ,55 + ,165 + ,55 + ,163 + ,62 + ,166 + ,61 + ,163 + ,53 + ,165 + ,55 + ,163 + ,57 + ,167 + ,55 + ,164 + ,76 + ,170 + ,76 + ,165 + ,76 + ,167 + ,77 + ,165 + ,64 + ,168 + ,64 + ,165 + ,65 + ,166 + ,66 + ,165 + ,62 + ,168 + ,62 + ,165 + ,50 + ,166 + ,50 + ,165 + ,71 + ,166 + ,71 + ,165 + ,56 + ,166 + ,54 + ,165 + ,68 + ,165 + ,69 + ,165 + ,53 + ,165 + ,53 + ,165 + ,50 + ,169 + ,50 + ,165 + ,64 + ,166 + ,64 + ,165 + ,76 + ,167 + ,77 + ,165 + ,75 + ,169 + ,76 + ,165 + ,69 + ,167 + ,73 + ,165 + ,55 + ,165 + ,55 + ,165 + ,57 + ,168 + ,58 + ,165 + ,54 + ,169 + ,58 + ,165 + ,57 + ,167 + ,56 + ,165 + ,66 + ,166 + ,66 + ,165 + ,76 + ,169 + ,75 + ,165 + ,66 + ,170 + ,67 + ,165 + ,59 + ,164 + ,59 + ,165 + ,58 + ,169 + ,54 + ,166 + ,54 + ,171 + ,59 + ,168 + ,63 + ,169 + ,61 + ,168 + ,64 + ,172 + ,62 + ,168 + ,63 + ,170 + ,62 + ,168 + ,62 + ,168 + ,64 + ,168 + ,60 + ,172 + ,55 + ,168 + ,75 + ,172 + ,70 + ,169 + ,78 + ,173 + ,75 + ,169 + ,68 + ,171 + ,68 + ,169 + ,65 + ,171 + ,64 + ,170 + ,61 + ,170 + ,61 + ,170 + ,66 + ,173 + ,70 + ,170 + ,68 + ,169 + ,63 + ,170 + ,74 + ,169 + ,73 + ,170 + ,57 + ,173 + ,58 + ,170 + ,71 + ,177 + ,71 + ,170 + ,55 + ,168 + ,56 + ,170 + ,56 + ,170 + ,56 + ,170 + ,70 + ,173 + ,68 + ,170 + ,70 + ,173 + ,67 + ,170 + ,61 + ,170 + ,61 + ,170 + ,61 + ,175 + ,61 + ,171 + ,69 + ,174 + ,69 + ,171 + ,62 + ,175 + ,61 + ,171 + ,79 + ,179 + ,79 + ,171 + ,55 + ,174 + ,57 + ,171 + ,64 + ,171 + ,66 + ,171 + ,59 + ,172 + ,58 + ,171 + ,65 + ,176 + ,64 + ,172 + ,65 + ,175 + ,66 + ,173 + ,79 + ,173 + ,76 + ,173 + ,54 + ,174 + ,56 + ,173 + ,62 + ,175 + ,63 + ,173 + ,68 + ,174 + ,68 + ,173 + ,70 + ,173 + ,70 + ,173 + ,89 + ,173 + ,86 + ,173 + ,70 + ,175 + ,75 + ,174 + ,69 + ,172 + ,68 + ,174 + ,68 + ,177 + ,70 + ,175 + ,71 + ,178 + ,71 + ,175 + ,75 + ,178 + ,73 + ,175 + ,64 + ,176 + ,65 + ,175 + ,88 + ,178 + ,86 + ,175 + ,85 + ,179 + ,82 + ,175 + ,71 + ,180 + ,76 + ,175 + ,80 + ,178 + ,76 + ,175 + ,66 + ,173 + ,66 + ,175 + ,53 + ,169 + ,52 + ,175 + ,62 + ,178 + ,66 + ,175 + ,63 + ,178 + ,63 + ,175 + ,78 + ,178 + ,77 + ,175 + ,68 + ,178 + ,68 + ,175 + ,83 + ,177 + ,84 + ,175 + ,66 + ,175 + ,68 + ,175 + ,81 + ,178 + ,82 + ,175 + ,80 + ,176 + ,78 + ,175 + ,74 + ,175 + ,71 + ,175 + ,54 + ,176 + ,55 + ,176 + ,119 + ,180 + ,124 + ,178 + ,80 + ,178 + ,80 + ,178 + ,65 + ,178 + ,66 + ,178 + ,71 + ,178 + ,68 + ,178 + ,90 + ,181 + ,91 + ,178 + ,79 + ,177 + ,81 + ,178 + ,67 + ,179 + ,67 + ,179 + ,77 + ,182 + ,77 + ,180 + ,69 + ,186 + ,73 + ,180 + ,101 + ,183 + ,100 + ,180 + ,78 + ,183 + ,80 + ,180 + ,73 + ,183 + ,74 + ,180 + ,69 + ,182 + ,70 + ,180 + ,69 + ,180 + ,71 + ,180 + ,76 + ,183 + ,75 + ,180 + ,83 + ,180 + ,80 + ,180 + ,83 + ,184 + ,83 + ,181 + ,103 + ,185 + ,101 + ,182 + ,82 + ,182 + ,85 + ,183 + ,69 + ,183 + ,70 + ,183 + ,59 + ,182 + ,61 + ,183 + ,84 + ,184 + ,86 + ,183 + ,84 + ,183 + ,90 + ,183 + ,96 + ,184 + ,94 + ,183 + ,88 + ,184 + ,86 + ,183 + ,92 + ,187 + ,101 + ,185 + ,102 + ,185 + ,107 + ,185 + ,97 + ,189 + ,98 + ,185 + ,88 + ,189 + ,87 + ,185 + ,87 + ,185 + ,89 + ,185 + ,90 + ,188 + ,91 + ,185 + ,65 + ,187 + ,67 + ,188 + ,85 + ,191 + ,83 + ,188 + ,96 + ,191 + ,95 + ,188 + ,88 + ,185 + ,93 + ,188 + ,76 + ,197 + ,75 + ,200) + ,dim=c(4 + ,180) + ,dimnames=list(c('h' + ,'w' + ,'rh' + ,'rw') + ,1:180)) > y <- array(NA,dim=c(4,180),dimnames=list(c('h','w','rh','rw'),1:180)) > 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' > par3 <- '2' > par2 <- '1' > par1 <- 'two.sided' > #'GNU S' R Code compiled by R2WASP v. 1.2.291 () > #Author: aston2 > #To cite this work: Ian E. Holliday, 2012, Wilcoxon-Mann-Whitney Test (v1.0.4) in Free Statistics Software (v$_version), Office for Research Development and Education, URL http://www.wessa.net/rwasp_Reddy-Moores%20Wilcoxon%20Mann-Witney%20Test.wasp/ > #Source of accompanying publication: > # > 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,'Wilcoxon-Mann-Whitney 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) > W <- wilcox.test(x[,par2],x[,par3],alternative=par1) > a<-table.row.start(a) > a<-table.element(a,'Test',1,TRUE) > a<-table.element(a,W$statistic[[1]]) > a<-table.element(a,signif(W$p.value, digits=5) ) > a<-table.row.end(a) > a<-table.end(a) > table.save(a,file="/var/wessaorg/rcomp/tmp/1zvd61338545246.tab") > a<-table.start() > a <- table.row.start(a) > a <- table.element(a,'Menu of R Modules',2,TRUE) > a <- table.row.end(a) > a <- table.row.start(a) > a <- table.element(a,'Workshop',1,TRUE) > a <- table.element(a,'Link',1,TRUE) > a <- table.row.end(a) > a <- table.row.start(a) > a<-table.element(a,'go to',1,header=TRUE) > a <- table.element(a,hyperlink('http://www.wessa.net/Ian.Holliday/rwasp_varia1.wasp','Histogram & QQplots','Click here to load the R module.'),1) > a <- table.row.end(a) > a <- table.row.start(a) > a<-table.element(a,'go to',1,header=TRUE) > a <- table.element(a,hyperlink('http://www.wessa.net/Ian.Holliday/rwasp_CARE Data Boxplot.wasp','Go to Scatterplot Matrix and Boxplots','Click here to load the R module.'),1) > a <- table.row.end(a) > a <- table.row.start(a) > a<-table.element(a,'go to',1,header=TRUE) > a <- table.element(a,hyperlink('http://www.wessa.net/Ian.Holliday/rwasp_Reddy-Moores K-S Test.wasp','Go to Kolmogorov-Smirnov Test','Click here to load the R module.'),1) > a <- table.row.end(a) > a<-table.end(a) > table.save(a,file="/var/wessaorg/rcomp/tmp/2akgs1338545246.tab") > > > > proc.time() user system elapsed 0.393 0.067 0.450