Home » date » 2009 » Nov » 06 »

Workshop 6 - Notched Box Plots

*Unverified author*

R Software Module: /rwasp_notchedbox1.wasp (opens new window with default values)

Title produced by software: Notched Boxplots

Date of computation: Fri, 06 Nov 2009 02:55:58 -0700

Cite this page as follows:

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL http://www.freestatistics.org/blog/date/2009/Nov/06/t12575014757qc9nn0vd9oq3aw.htm/, Retrieved Wed, 22 May 2013 14:17:57 +0000

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords:

SHWS 6

System-generated keywords (parent):

t12571971894ac3260tdvsnex9 (pk = 52998)

Estimated Impact

Dataseries X:

» Textfile « » CSV « » Correlation Matrix « » Notched Boxplots «

269645	308347	1.8	8.4
267037	298427	1.6	8.4
258113	289231	1.9	8.4
262813	291975	1.7	8.6
267413	294912	1.6	8.9
267366	293488	1.3	8.8
264777	290555	1.1	8.3
258863	284736	1.9	7.5
254844	281818	2.6	7.2
254868	287854	2.3	7.4
277267	316263	2.4	8.8
285351	325412	2.2	9.3
286602	326011	2	9.3
283042	328282	2.9	8.7
276687	317480	2.6	8.2
277915	317539	2.3	8.3
277128	313737	2.3	8.5
277103	312276	2.6	8.6
275037	309391	3.1	8.5
270150	302950	2.8	8.2
267140	300316	2.5	8.1
264993	304035	2.9	7.9
287259	333476	3.1	8.6
291186	337698	3.1	8.7
292300	335932	3.2	8.7
288186	323931	2.5	8.5
281477	313927	2.6	8.4
282656	314485	2.9	8.5
280190	313218	2.6	8.7
280408	309664	2.4	8.7
276836	302963	1.7	8.6
275216	298989	2	8.5
274352	298423	2.2	8.3
271311	301631	1.9	8
289802	329765	1.6	8.2
290726	335083	1.6	8.1
292300	327616	1.2	8.1
278506	309119	1.2	8
269826	295916	1.5	7.9
265861	291413	1.6	7.9
269034	291542	1.7	8
264176	284678	1.8	8
255198	276475	1.8	7.9
253353	272566	1.8	8
246057	264981	1.3	7.7
235372	263290	1.3	7.2
258556	296806	1.4	7.5
260993	303598	1.1	7.3
254663	286994	1.5	7
250643	276427	2.2	7
243422	266424	2.9	7
247105	267153	3.1	7.2
248541	268381	3.5	7.3
245039	262522	3.6	7.1
237080	255542	4.4	6.8
237085	253158	4.2	6.4
225554	243803	5.2	6.1
226839	250741	5.8	6.5
247934	280445	5.9	7.7
248333	285257	5.4	7.9
246969	270976	5.5	7.5
245098	261076	4.7	6.9
246263	255603	3.1	6.6
255765	260376	2.6	6.9
264319	263903	2.3	7.7
268347	264291	1.9	8
273046	263276	0.6	8
273963	262572	0.6	7.7
267430	256167	-0.4	7.3
271993	264221	-1.1	7.4
292710	293860	-1.7	8.1
295881	300713	-0.8	8.3

Output produced by software:

Enter (or paste) a matrix (table) containing all data (time) series. Every column represents a different variable and must be delimited by a space or Tab. Every row represents a period in time (or category) and must be delimited by hard returns. The easiest way to enter data is to copy and paste a block of spreadsheet cells. Please, do not use commas or spaces to seperate groups of digits!

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	2 seconds
R Server	'Sir Ronald Aylmer Fisher' @ 193.190.124.24

Boxplot statistics
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
Male	225554	254753.5	267421.5	277591	295881
Female	243803	267767	293674	310970	337698
infl	0.6	1.6	2.2	2.9	4.7
werkltot	6.1	7.4	8	8.5	9.3

Boxplot Notches
Variable	lower bound	median	upper bound
Male	263169.048206292	267421.5	271673.951793708
Female	285629.394642865	293674	301718.605357135
infl	1.95793377857381	2.2	2.44206622142619
werkltot	7.7951747357163	8	8.2048252642837

Charts produced by software:

http://www.freestatistics.org/blog/date/2009/Nov/06/t12575014757qc9nn0vd9oq3aw/1z1ay1257501354.png (opens in new window)

http://www.freestatistics.org/blog/date/2009/Nov/06/t12575014757qc9nn0vd9oq3aw/1z1ay1257501354.ps (opens in new window)

Click here to open pdf file.

Parameters (Session):

par1 = grey ;

Parameters (R input):

par1 = grey ;

R code (references can be found in the software module):

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')