• QR Code (size=2)
• QR Code (size=3)
• QR Code (size=4)
• QR Code (size=5)
• QR Code (size=6)

7	11	5	12	6	9	20	22	14	15	21	20	4	10
9	13	18	14	9	10	23	20	26	24	25	28	5	9
13	14	8	19	9	5	24	19	22	17	28	16	4	4
15	14	12	21	9	4	20	21	18	25	24	24	16	4
15	15	18	15	9	12	13	20	20	15	10	20	4	10
15	15	12	16	10	7	18	21	18	21	27	12	8	4
16	16	11	18	10	12	23	23	16	21	10	25	4	7
16	17	11	19	9	10	24	24	20	25	23	27	5	4
16	17	16	12	14	9	18	22	22	12	18	19	8	5
16	17	16	20	14	17	17	22	20	23	18	21	8	8
16	17	20	18	13	15	25	20	24	19	24	21	7	4
16	18	16	14	12	12	21	20	27	21	27	18	7	8
16	18	15	12	7	12	24	21	22	10	21	23	5	5
16	18	19	16	15	13	20	24	18	18	23	23	7	4
16	18	16	17	16	13	19	18	27	16	25	16	16	4
17	19	14	18	11	11	26	20	23	21	27	21	5	8
17	19	19	16	18	12	20	23	18	21	17	21	18	4
17	19	12	22	11	6	19	19	20	21	22	20	14	5
17	20	17	26	18	5	15	27	14	21	15	27	12	4
18	20	12	19	7	9	23	11	25	22	28	20	4	4
18	20	19	12	15	7	26	20	21	22	27	24	7	4
18	20	16	15	17	14	22	25	15	16	21	23	9	4
18	20	20	22	10	5	22	21	21	15	21	18	5	4
18	20	17	21	12	14	20	22	22	23	23	19	6	4
18	21	11	17	12	11	22	23	13	20	21	22	5	8
18	21	19	20	15	17	20	24	21	17	20	23	10	4
18	21	20	22	12	16	20	26	20	24	21	25	6	5
18	21	10	17	8	13	21	23	15	22	24	26	6	8
18	21	16	20	18	18	25	22	23	20	20	16	6	9
19	21	19	18	18	16	22	20	18	21	20	21	6	5
19	22	13	20	14	13	27	27	14	17	22	27	4	4
19	22	9	25	5	17	20	25	8	25	27	22	4	4
19	22	11	21	14	16	23	24	13	21	23	19	4	8
19	22	8	23	14	19	25	12	6	25	28	25	8	5
19	22	20	22	13	11	25	28	22	22	25	25	7	4
19	22	17	16	14	12	21	21	18	15	20	22	6	5
19	22	14	20	18	18	21	23	15	19	21	22	10	4
19	23	23	16	18	13	22	28	24	17	24	24	8	4
20	23	16	15	15	8	24	20	17	25	20	26	4	12
20	23	16	25	8	11	24	23	20	26	24	16	8	4
20	23	24	22	14	18	22	25	26	20	22	26	6	4
20	23	19	20	14	17	24	26	20	18	21	25	4	5
20	23	20	23	12	17	25	22	22	22	22	22	4	4
20	23	21	23	13	22	21	23	21	24	26	22	8	7
20	24	16	22	12	19	18	23	18	24	17	24	4	4
20	24	17	24	14	24	25	24	21	24	24	24	8	6
20	24	13	23	11	20	26	23	17	26	24	25	6	5
20	24	17	23	17	20	26	27	22	23	24	26	7	4
20	24	17	15	10	18	19	21	18	16	21	20	4	4
20	24	16	20	17	12	22	28	18	25	21	25	6	4
20	24	18	22	17	16	20	28	16	21	18	23	4	4
21	25	15	17	19	4	24	28	24	19	28	23	7	4
21	25	18	26	20	18	18	24	24	22	12	21	15	5
21	25	17	27	18	10	25	27	17	25	22	15	6	4
21	25	27	27	16	21	23	23	20	28	21	24	4	4
21	25	22	19	19	13	28	22	19	21	28	21	4	4
21	25	15	22	11	15	24	25	23	16	23	21	4	6
21	26	22	25	14	24	26	28	26	22	22	28	11	4
21	26	19	25	12	12	22	21	19	21	26	19	5	4
22	26	12	24	20	23	27	28	22	26	20	27	8	4
22	26	16	26	14	22	23	25	18	23	23	24	4	7
22	27	13	24	15	19	25	24	23	18	25	19	8	4
22	28	19	28	17	24	23	28	21	28	21	27	4	4
22	NA	25	NA	15	NA	26	NA	23	NA	22	NA	4	NA
22	NA	20	NA	16	NA	25	NA	26	NA	28	NA	5	NA
22	NA	19	NA	18	NA	24	NA	24	NA	25	NA	4	NA
22	NA	16	NA	13	NA	25	NA	23	NA	22	NA	6	NA
22	NA	23	NA	19	NA	25	NA	24	NA	24	NA	4	NA
22	NA	24	NA	17	NA	23	NA	22	NA	23	NA	4	NA
22	NA	20	NA	10	NA	24	NA	25	NA	23	NA	5	NA
22	NA	18	NA	12	NA	25	NA	23	NA	28	NA	6	NA
22	NA	16	NA	13	NA	25	NA	23	NA	22	NA	6	NA
23	NA	19	NA	15	NA	24	NA	23	NA	21	NA	4	NA
23	NA	20	NA	10	NA	23	NA	21	NA	26	NA	4	NA
23	NA	18	NA	19	NA	26	NA	20	NA	21	NA	4	NA
23	NA	18	NA	8	NA	28	NA	27	NA	26	NA	4	NA
23	NA	13	NA	14	NA	22	NA	11	NA	23	NA	8	NA
23	NA	20	NA	20	NA	23	NA	23	NA	22	NA	8	NA
24	NA	20	NA	8	NA	28	NA	11	NA	24	NA	4	NA
24	NA	17	NA	10	NA	25	NA	14	NA	24	NA	4	NA
24	NA	18	NA	9	NA	17	NA	20	NA	25	NA	4	NA
24	NA	20	NA	23	NA	25	NA	23	NA	19	NA	10	NA
24	NA	24	NA	22	NA	25	NA	26	NA	26	NA	5	NA
24	NA	20	NA	16	NA	26	NA	22	NA	27	NA	5	NA
24	NA	17	NA	18	NA	21	NA	21	NA	24	NA	8	NA
24	NA	17	NA	19	NA	23	NA	20	NA	20	NA	6	NA
24	NA	12	NA	15	NA	28	NA	11	NA	27	NA	4	NA
25	NA	23	NA	19	NA	27	NA	28	NA	22	NA	4	NA
25	NA	24	NA	17	NA	23	NA	24	NA	14	NA	4	NA
25	NA	24	NA	17	NA	23	NA	24	NA	14	NA	4	NA
25	NA	22	NA	20	NA	28	NA	24	NA	25	NA	4	NA
25	NA	23	NA	22	NA	23	NA	26	NA	22	NA	4	NA
25	NA	23	NA	22	NA	27	NA	20	NA	26	NA	8	NA
26	NA	21	NA	21	NA	23	NA	17	NA	23	NA	4	NA
26	NA	19	NA	16	NA	24	NA	16	NA	25	NA	5	NA
26	NA	27	NA	23	NA	27	NA	27	NA	25	NA	4	NA
27	NA	22	NA	20	NA	25	NA	24	NA	18	NA	4	NA
28	NA	28	NA	9	NA	28	NA	28	NA	25	NA	4	NA

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('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('lower_whisker.htm','lower whisker','definition of lower whisker'),1,TRUE)
a<-table.element(a,hyperlink('lower_hinge.htm','lower hinge','definition of lower hinge'),1,TRUE)
a<-table.element(a,hyperlink('central_tendency.htm','median','definitions about measures of central tendency'),1,TRUE)
a<-table.element(a,hyperlink('upper_hinge.htm','upper hinge','definition of upper hinge'),1,TRUE)
a<-table.element(a,hyperlink('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')