Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
77.5 54.4 77.6 50.9 84.8 61.7 78.2 48.0 79.1 60.4 71.2 44.6 82.2 58.6 79.3 58.9 80.0 51.3 79.4 60.3 78.4 53.5 78.7 65.1 77.4 51.0 78.0 49.9 77.1 55.4 80.2 59.8 80.7 59.7 80.4 53.0 79.2 51.5 79.7 48.6 78.1 53.4 81.8 61.7 78.9 59.8 79.5 57.8 82.1 60.5 77.7 55.8 84.9 60.7 77.5 54.5 77.5 50.5 78.0 52.7 78.7 54.2 78.8 54.1 73.9 51.9 89.9 51.6 73.4 46.1 75.3 51.9 73.2 42.1 83.0 58.0 79.1 53.1 72.3 40.1 78.9 52.8 81.3 58.5 79.2 51.2 76.2 46.9 83.2 65.9 78.5 52.2 76.6 56.3 78.3 54.0 81.1 58.8 80.2 54.2 72.5 43.4 87.3 50.0 79.9 57.5 74.7 45.7 84.4 60.3 79.9 54.9 77.6 53.1 89.4 56.5 86.3 61.0 77.6 52.6 78.9 53.5 70.0 42.2 82.4 63.8 85.1 60.2 75.6 50.2 73.8 51.7 84.4 61.0 74.6 44.3 74.8 51.8 70.9 43.8 79.5 55.2 79.2 56.1 79.4 55.2 77.9 51.8 80.4 59.0 79.4 49.7 83.3 54.7 79.7 58.2 79.3 48.6 77.4 48.6 78.8 43.7 81.4 69.8 82.2 64.0 77.1 55.3 80.4 53.2 78.1 55.2 75.1 48.1 84.8 62.3 83.0 58.3 77.6 54.6 69.6 37.1 69.3 40.8 76.9 56.4 77.6 58.2 80.6 60.2 76.4 52.2 80.2 43.6 82.2 60.5 74.7 52.6 75.4 54.3 83.5 60.5 71.2 41.1 80.5 56.8 76.6 52.8 70.6 43.4 76.8 54.6 84.4 60.4 77.6 48.4 74.1 49.0 78.0 51.8 81.2 59.2 75.4 52.2 86.6 59.7 77.1 54.3 78.7 55.5 87.3 63.6 85.3 61.7 77.7 55.1 80.6 60.5 82.0 58.4 73.3 46.0 70.3 44.4 78.9 44.1 80.3 44.7 81.6 51.7 85.5 58.8 79.2 57.1 79.7 55.5 78.4 63.5 85.3 61.3 71.5 42.7 78.8 51.2 75.7 52.0 75.3 53.9 77.5 68.4 78.2 49.6 81.0 53.6 79.5 56.3 76.6 50.9 80.1 50.9 78.0 56.5 84.4 60.4 79.8 57.9 78.3 49.5 82.7 50.0 78.8 56.6 76.9 53.3 75.0 53.3 80.5 54.5 70.9 41.5 77.7 47.2 81.6 60.0 77.1 54.4 84.6 64.3 72.8 42.6 77.8 52.7 85.8 61.4 76.7 52.2 75.3 50.4 72.5 42.5 77.2 52.2 78.8 56.5 81.2 58.5 77.7 50.9 80.6 58.8 80.7 62.3 80.0 57.6 81.8 56.2 78.4 58.2 75.5 53.3 78.0 55.4 77.1 48.7 76.5 50.4 78.9 57.3 80.9 54.3 79.9 51.3 81.6 59.8 76.4 53.6 75.4 48.6 77.3 53.3 79.1 55.7 84.4 61.7 84.3 64.0 81.7 59.5 84.3 59.0 80.6 49.1 89.3 56.0 76.8 52.6 72.2 51.9 76.7 52.7 76.3 48.0 78.2 52.1 83.0 57.0 88.1 63.3 76.4 53.1 75.6 44.8 78.9 57.4 79.2 56.9 72.4 41.4 74.9 43.9 78.9 53.7 79.7 53.8 78.4 52.8 76.4 56.7 79.1 54.2 74.6 47.0 79.1 55.3 81.4 56.4 81.6 59.5 80.3 54.9 79.3 46.6 77.1 43.0 80.2 57.4 75.7 52.0 79.9 51.9 75.8 50.1 78.9 63.8 83.0 62.2 85.8 64.9 86.1 66.4 80.9 55.3 86.5 63.5 80.0 54.3 77.8 55.6 74.5 53.0 74.3 47.8 75.7 48.7 80.4 51.0 79.3 54.1 70.7 43.6 78.1 51.3 81.0 50.7 76.3 51.4 80.1 55.3 87.3 64.3 82.8 48.8 74.0 44.3 72.1 48.2 76.9 49.0 75.4 53.3 73.6 40.8 74.9 42.1 78.0 51.2 77.6 55.6 79.2 52.7 80.9 55.3 80.8 58.9 80.7 58.2 79.1 50.9 79.0 53.1 72.7 43.1 78.2 57.1 78.2 56.2 78.7 50.0 76.8 49.0 82.3 53.1 78.4 62.0 78.8 55.5 71.1 45.1 81.8 54.3 79.6 55.0 71.0 42.0 82.0 53.0 75.4 51.9 84.5 57.3 82.4 48.4 80.3 51.0 69.9 42.7 84.4 53.5 81.0 58.2 76.9 53.6 69.9 48.3 75.4 45.0 72.2 46.2 80.9 63.6 79.9 70.5 79.2 59.6 81.1 69.7 79.4 67.0 77.9 67.0 76.9 50.5 82.9 59.0 77.2 50.9 88.6 56.2 78.8 52.5 77.3 54.2 76.1 48.8 84.9 63.7 83.1 49.7 80.6 55.1 82.6 60.7 82.6 60.6 87.6 62.5 77.5 51.9 79.7 52.2 83.4 63.7 79.2 65.3 77.8 54.4 77.2 51.4 77.1 49.8 76.6 57.0 78.3 53.6 78.4 53.0 81.2 59.4 81.0 58.7 79.6 54.3 78.7 50.9 85.6 63.5 81.0 58.5 81.1 60.4 77.5 47.4 76.6 51.4 72.3 46.7 81.8 51.7 74.0 54.3 77.2 43.7 72.3 44.2 80.7 61.9 80.9 56.8 77.4 49.6 80.8 56.6 78.9 50.1 76.4 45.1 76.8 47.5 78.5 52.2 76.5 52.2 79.5 49.7 79.7 55.8 70.1 40.3 80.4 59.9 76.8 52.1 75.4 47.0 80.0 56.2 78.4 56.1 75.6 51.7 80.8 60.1 77.7 51.0 85.5 59.0 77.8 53.1 80.5 45.0 78.0 56.1 78.3 50.8 72.8 44.1 76.1 46.9 78.4 56.3 82.8 58.2 83.0 57.4 79.5 46.0 77.2 46.7 76.3 50.4 81.1 61.6 78.6 55.4 79.0 56.7 80.2 56.5 79.3 49.2 78.8 56.2 77.0 51.4 81.6 61.4 78.4 49.7 85.5 63.7 78.3 54.4 76.3 52.4 75.2 52.8 80.6 49.8 80.3 53.8 75.6 50.6 81.2 58.1 81.4 48.3 86.5 64.7
Names of X columns:
X1 X2
Sample Range:
(leave blank to include all observations)
From:
To:
Color
grey
grey
white
blue
red
black
brown
yellow
Omit all rows with missing values?
no
no
yes
Chart options
Title:
Label y-axis:
Label x-axis:
R Code
if(par2=='yes') { z <- na.omit(as.data.frame(t(y))) } else { z <- as.data.frame(t(y)) } bitmap(file='test1.png') (r<-boxplot(z ,xlab=xlab,ylab=ylab,main=main,notch=TRUE,col=par1)) dev.off() load(file='createtable') a<-table.start() a<-table.row.start(a) a<-table.element(a,'Boxplot statistics',6,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Variable',1,TRUE) a<-table.element(a,'lower whisker',1,TRUE) a<-table.element(a,'lower hinge',1,TRUE) a<-table.element(a,'median',1,TRUE) a<-table.element(a,'upper hinge',1,TRUE) a<-table.element(a,'upper whisker',1,TRUE) a<-table.row.end(a) for (i in 1:length(y[,1])) { a<-table.row.start(a) a<-table.element(a,dimnames(t(x))[[2]][i],1,TRUE) for (j in 1:5) { a<-table.element(a,r$stats[j,i]) } 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,'Boxplot Notches',4,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Variable',1,TRUE) a<-table.element(a,'lower bound',1,TRUE) a<-table.element(a,'median',1,TRUE) a<-table.element(a,'upper bound',1,TRUE) a<-table.row.end(a) for (i in 1:length(y[,1])) { a<-table.row.start(a) a<-table.element(a,dimnames(t(x))[[2]][i],1,TRUE) a<-table.element(a,r$conf[1,i]) a<-table.element(a,r$stats[3,i]) a<-table.element(a,r$conf[2,i]) a<-table.row.end(a) } a<-table.end(a) table.save(a,file='mytable1.tab')
Compute
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
Click here to blog (archive) this computation