Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data X:
13 50 26 8 62 57 14 54 37 16 71 67 14 54 43 13 65 52 15 73 52 13 52 43 20 84 84 17 42 67 15 66 49 16 65 70 12 78 52 17 73 58 11 75 68 16 72 62 16 66 43 15 70 56 13 61 56 14 81 74 19 71 65 16 69 63 17 71 58 10 72 57 15 68 63 14 70 53 14 68 57 16 61 51 15 67 64 17 76 53 14 70 29 16 60 54 15 72 58 16 69 43 16 71 51 10 62 53 8 70 54 17 64 56 14 58 61 10 76 47 14 52 39 12 59 48 16 68 50 16 76 35 16 65 30 8 67 68 16 59 49 15 69 61 8 76 67 13 63 47 14 75 56 13 63 50 16 60 43 19 73 67 19 63 62 14 70 57 15 75 41 13 66 54 10 63 45 16 63 48 15 64 61 11 70 56 9 75 41 16 61 43 12 60 53 12 62 44 14 73 66 14 61 58 13 66 46 15 64 37 17 59 51 14 64 51 11 60 56 9 56 66 7 78 37 13 53 59 15 67 42 12 59 38 15 66 66 14 68 34 16 71 53 14 66 49 13 73 55 16 72 49 13 71 59 16 59 40 16 64 58 16 66 60 10 78 63 12 68 56 12 73 54 12 62 52 12 65 34 19 68 69 14 65 32 13 60 48 16 71 67 15 65 58 12 68 57 8 64 42 10 74 64 16 69 58 16 76 66 10 68 26 18 72 61 12 67 52 16 63 51 10 59 55 14 73 50 12 66 60 11 62 56 15 69 63 7 66 61 16 51 52 16 56 16 16 67 46 16 69 56 12 57 52 15 56 55 14 55 50 15 63 59 16 67 60 13 65 52 10 47 44 17 76 67 15 64 52 18 68 55 16 64 37 20 65 54 16 71 72 17 63 51 16 60 48 15 68 60 13 72 50 16 70 63 16 61 33 16 61 67 17 62 46 20 71 54 14 71 59 17 51 61 6 56 33 16 70 47 15 73 69 16 76 52 16 68 55 14 48 41 16 52 73 16 60 52 16 59 50 14 57 51 14 79 60 16 60 56 16 60 56 15 59 29 16 62 66 16 59 66 18 61 73 15 71 55 16 57 64 16 66 40 16 63 46 17 69 58 14 58 43 18 59 61 9 48 51 15 66 50 14 73 52 15 67 54 13 61 66 16 68 61 20 75 80 14 62 51 12 69 56 15 58 56 15 60 56 15 74 53 16 55 47 11 62 25 16 63 47 7 69 46 11 58 50 9 58 39 15 68 51 16 72 58 14 62 35 15 62 58 13 65 60 13 69 62 12 66 63 16 72 53 14 62 46 16 75 67 14 58 59 15 66 64 10 55 38 16 47 50 14 72 48 16 62 48 12 64 47 16 64 66 16 19 47 15 50 63 14 68 58 16 70 44 11 79 51 15 69 43 18 71 55 13 48 38 7 73 45 7 74 50 17 66 54 18 71 57 15 74 60 8 78 55 13 75 56 13 53 49 15 60 37 18 70 59 16 69 46 14 65 51 15 78 58 19 78 64 16 59 53 12 72 48 16 70 51 11 63 47 16 63 59 15 71 62 19 74 62 15 67 51 14 66 64 14 62 52 17 80 67 16 73 50 20 67 54 16 61 58 9 73 56 13 74 63 15 32 31 19 69 65 16 69 71 17 84 50 16 64 57 9 58 47 11 59 47 14 78 57 19 57 43 13 60 41 14 68 63 15 68 63 15 73 56 14 69 51 16 67 50 17 60 22 12 65 41 15 66 59 17 74 56 15 81 66 10 72 53 16 55 42 15 49 52 11 74 54 16 53 44 16 64 62 16 65 53 14 57 50 14 51 36 16 80 76 16 67 66 18 70 62 14 74 59 20 75 47 15 70 55 16 69 58 16 65 60 16 55 44 12 71 57
Names of X columns:
CONFSTATTOT AMS.E AMS.I
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
yes
Chart options
Title:
Label y-axis:
Label x-axis:
R Code
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,hyperlink('http://www.xycoon.com/overview.htm','Boxplot statistics','Boxplot overview'),6,TRUE) a<-table.row.end(a) a<-table.row.start(a) a<-table.element(a,'Variable',1,TRUE) a<-table.element(a,hyperlink('http://www.xycoon.com/lower_whisker.htm','lower whisker','definition of lower whisker'),1,TRUE) a<-table.element(a,hyperlink('http://www.xycoon.com/lower_hinge.htm','lower hinge','definition of lower hinge'),1,TRUE) a<-table.element(a,hyperlink('http://www.xycoon.com/central_tendency.htm','median','definitions about measures of central tendency'),1,TRUE) a<-table.element(a,hyperlink('http://www.xycoon.com/upper_hinge.htm','upper hinge','definition of upper hinge'),1,TRUE) a<-table.element(a,hyperlink('http://www.xycoon.com/upper_whisker.htm','upper whisker','definition of 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
1 seconds
R Server
Big Analytics Cloud Computing Center
Click here to blog (archive) this computation