Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_notchedbox1.wasp
Title produced by softwareNotched Boxplots
Date of computationSat, 07 Nov 2009 09:11:26 -0700
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2009/Nov/07/t12576103208hw9t652sjdyn05.htm/, Retrieved Tue, 07 May 2024 01:19:24 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=54448, Retrieved Tue, 07 May 2024 01:19:24 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact130
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Notched Boxplots] [Foutmelding] [2009-11-07 16:11:26] [1aecede37375310a889a187dca5e5c0a] [Current]
Feedback Forum

Post a new message
Dataseries X:
90,21	95,40	98,83	94,60
93,24	99,31	99,45	85,88
95,60	101,80	97,19	77,43
97,58	100,53	95,19	85,15
100,81	102,28	95,71	88,27
101,65	101,89	96,56	102,76
102,08	98,08	97,38	102,53
100,18	98,98	97,89	99,72
101,36	100,02	103,85	106,46
103,46	100,58	103,78	111,29
106,59	100,67	104,74	123,13
107,24	100,46	109,44	122,77
107,84	98,47	115,01	113,87
110,08	102,01	119,20	108,04
114,34	103,28	126,34	110,54
120,00	103,70	133,03	122,29
124,78	104,64	136,57	118,80
128,21	106,31	136,16	121,30
127,48	107,16	146,40	131,26
124,39	108,10	156,09	138,67
116,83	104,90	138,74	134,28
121,13	105,27	146,81	143,25
126,39	107,37	144,88	143,10
129,92	110,01	138,46	123,67
135,43	114,11	136,78	115,57
137,43	116,22	143,13	114,43
140,42	118,06	140,00	120,32
145,42	119,35	142,50	105,96
147,35	120,48	149,54	112,31
142,58	117,02	145,69	119,20
150,25	121,66	147,92	130,24
153,71	127,88	145,78	130,29
151,23	128,58	143,73	135,34
149,32	130,42	142,64	144,89
137,53	126,28	143,45	137,53
140,60	129,31	150,36	147,00
145,14	132,59	155,79	157,30
134,34	125,91	161,87	178,27
134,72	127,88	162,31	174,42
125,81	119,59	177,40	177,56
121,77	118,46	184,29	181,14
120,24	116,31	183,93	197,89
126,24	120,72	169,99	211,09
124,39	122,21	168,68	238,81
114,68	115,00	168,22	255,45
99,24	107,99	175,42	261,45
99,71	109,98	165,37	223,45
96,94	106,01	169,06	195,25
71,92	87,58	179,68	145,79
65,92	82,17	175,58	106,81
60,96	81,99	179,74	84,32
62,35	80,08	190,53	87,19
59,26	73,35	215,82	84,73
54,65	69,01	209,81	91,41
61,01	76,23	199,53	98,32
67,15	80,10	200,58	111,35
66,42	81,96	199,20	132,91
67,77	82,79	195,59	126,31
75,05	89,42	196,36	140,29
79,95	91,90	201,71	131,70




\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input & view raw input (R code)  \tabularnewline
Raw Output & view raw output of R engine  \tabularnewline
Computing time & 2 seconds \tabularnewline
R Server & 'RServer@AstonUniversity' @ vre.aston.ac.uk \tabularnewline
R Framework error message & 
The field 'Names of X columns' contains a hard return which cannot be interpreted.
Please, resubmit your request without hard returns in the 'Names of X columns'.
\tabularnewline R Engine error message &
Error in dimnames(data) <- dimnames : 
  length of 'dimnames' [1] not equal to array extent
Calls: array
Execution halted
\tabularnewline \hline \end{tabular} %Source: https://freestatistics.org/blog/index.php?pk=54448&T=0

[TABLE]
[ROW][C]Summary of computational transaction[/C][/ROW]
[ROW][C]Raw Input[/C][C]view raw input (R code) [/C][/ROW]
[ROW][C]Raw Output[/C][C]view raw output of R engine [/C][/ROW]
[ROW][C]Computing time[/C][C]2 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'RServer@AstonUniversity' @ vre.aston.ac.uk[/C][/ROW]
[ROW][C]R Framework error message[/C][C]
The field 'Names of X columns' contains a hard return which cannot be interpreted.
Please, resubmit your request without hard returns in the 'Names of X columns'.
[/C][/ROW] [ROW][C]R Engine error message[/C][C]
Error in dimnames(data) <- dimnames : 
  length of 'dimnames' [1] not equal to array extent
Calls: array
Execution halted
[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=54448&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=54448&T=0

As an alternative you can also use a QR Code:  

The GUIDs for individual cells are displayed in the table below:

Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'RServer@AstonUniversity' @ vre.aston.ac.uk
R Framework error message
The field 'Names of X columns' contains a hard return which cannot be interpreted.
Please, resubmit your request without hard returns in the 'Names of X columns'.
R Engine error message
Error in dimnames(data) <- dimnames : 
  length of 'dimnames' [1] not equal to array extent
Calls: array
Execution halted



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