Wessa.net

Send output to:

Data X:
Pment New-NoP 70.8 70.9483 69.6 70.6083 69.87 68.6083 67.47 68.2783 67.6 67.6083 67.13 65.6083 66.27 68.9483 66.73 67.2783 68.07 64.9483 67.8 67.9483 64.8 64.9483 64.6 65.9483 64.2 66.6083 64.2 64.6083 63.67 63.9483 61 64.6083 59.67 63.6083 59.67 62.9483 59.8 62.9483 60.73 63.6083 59.4 61.6083 58.07 63.6083 57.47 60.2783 70.73 57.9483 72.87 62.9483 66 53.6083 66.07 75.6083 66 74.6083 66.27 73.2783 64 70.2783 63.67 70.2783 63.73 67.6083 63.33 69.6083 63.53 68.6083 63.53 68.2783 62.87 65.9483 59.53 67.9483 62.8 68.9483 60.8 65.9483 59.8 66.2783 56.67 65.6083 57.67 67.9483 58.4 65.6083 55.47 66.6083 56.2 63.9483 71.53 63.6083 68.67 65.9483 65.67 62.9483 66.73 62.2783 67.33 60.9483 66.73 63.9483 66.87 62.2783 65.8 61.2783 64.73 61.9483 65.47 62.9483 63.6 59.6083 64.07 60.2783 64.67 59.9483 63.73 57.6083 62.53 57.9483 61.93 55.2783 62.67 51.2783 62.8 8.6083 61.33 74.2783 62.6 72.9483 59.13 71.9483 61.27 70.2783 59.47 69.9483 57.87 69.9483 59.73 67.9483 61.4 67.9483 58.8 68.2783 58.33 66.2783 57.47 66.2783 57.13 65.9483 55 65.9483 51.53 67.6083 72.73 65.2783 73 66.6083 70.8 64.6083 70.07 64.6083 71.67 64.9483 71.07 61.9483 70.67 62.6083 70.73 62.2783 70.73 61.6083 68.6 60.9483 69.6 62.2783 66.47 59.6083 67.07 59.9483 68.67 58.9483 66.93 60.6083 65.93 59.2783 68.87 59.2783 66.53 58.9483 65.8 58.6083 66.6 53.2783 66 52.6083 65 53.9483 66.8 47.9483 65.6 10.6083 66 7.2783 65.67 70.9483 64.67 71.6083 65.07 69.6083 64.67 70.2783 65.07 69.9483 65.2 70.9483 64.87 69.9483 63.47 69.2783 62.6 68.9483 64.07 70.9483 63.73 67.9483 64.67 67.6083 61.6 67.9483 61.6 67.6083 60.47 67.9483 61.27 67.2783 63 65.9483 61.47 65.6083 60.87 64.9483 61.67 64.2783 62.87 65.9483 62.4 65.6083 59.73 62.9483 60.13 64.6083 58.8 63.9483 59.6 63.6083 58.93 63.9483 60.13 65.2783 58.2 65.2783 58.27 64.2783 58.27 64.2783 55.07 62.9483 53.87 62.6083 52.33 62.2783 47.2 60.6083 37.93 58.9483 72.73 59.6083 70.07 58.2783 70.67 56.9483 72.07 48.2783 68.8 69.9483 68.8 69.2783 67.47 70.6083 66.73 68.2783 66.53 66.6083 66 65.6083 67.6 67.2783 66 67.9483 66 66.2783 66.53 65.6083 65.8 68.9483 64.27 66.9483 64.67 68.2783 64.6 65.2783 64.13 64.9483 65.47 63.9483 62.93 64.6083 63.53 60.9483 62.13 60.9483 63.87 58.6083 64.67 55.2783 63.33 55.2783 63.13 51.2783 62.8 72.2783 62.4 69.2783 62.4 68.2783 62.6 68.2783 61.47 68.2783 62.2 66.2783 63 65.2783 61.8 64.2783 59.73 64.2783 60.33 66.2783 60.13 64.2783 59.53 63.2783 59 65.2783 55.93 64.2783 41.87 64.2783 36.33 62.2783 71.67 62.2783 71.47 64.2783 70.47 62.2783 69.53 63.2783 70.73 60.2783 69.93 58.2783 68.73 55.2783 67.53 51.2783
Names of X columns:
New nopment
Alternative


Column number for the first variable


Column number for the second variable


Chart options



R Code
par2 <- as.numeric(par2) par3 <- as.numeric(par3) x <- t(y) load(file='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='mytable.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/rwasp_varia1.wasp?mobile=-400','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/rwasp_BoxplotAndScatterplotMatrix.wasp?mobile=-400','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/rwasp_Reddy-Moores K-S Test.wasp?mobile=-400','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='mytable1.tab')

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	0 seconds
R Server	Big Analytics Cloud Computing Center
R Engine error message	Error in array(list(Pment, New - NoP, 70.8, 70.9483, 69.6, 70.6083, 69.87, : object 'Pment' not found Execution halted