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 computationTue, 02 Dec 2014 22:15:58 +0000
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2014/Dec/02/t1417558655n5wj36zqroyk9gj.htm/, Retrieved Mon, 13 May 2024 23:11:08 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=262913, Retrieved Mon, 13 May 2024 23:11:08 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact74
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Percentiles] [Intrinsic Motivat...] [2010-10-12 12:10:58] [b98453cac15ba1066b407e146608df68]
- RMPD  [Kernel Density Estimation] [] [2011-10-18 22:42:23] [b98453cac15ba1066b407e146608df68]
- RMPD    [Percentiles] [] [2011-10-18 22:46:45] [b98453cac15ba1066b407e146608df68]
- RMPD      [Notched Boxplots] [] [2011-10-18 22:58:56] [b98453cac15ba1066b407e146608df68]
-    D        [Notched Boxplots] [] [2011-10-18 23:02:48] [b98453cac15ba1066b407e146608df68]
- RM D            [Notched Boxplots] [] [2014-12-02 22:15:58] [6993448de96b8662e47595bfdf466bf3] [Current]
Feedback Forum

Post a new message
Dataseries X:
72	NA
110	NA
NA	115
86	NA
NA	134
NA	93
NA	108
117	NA
NA	84
NA	164
NA	105
NA	109
NA	131
NA	122
127	NA
139	NA
123	NA
NA	105
122	NA
NA	111
149	NA
NA	132
NA	124
124	NA
NA	125
NA	122
NA	119
NA	118
102	NA
NA	127
125	NA
92	NA
102	NA
NA	124
NA	123
NA	107
NA	114
NA	110
120	NA
NA	111
NA	112
119	NA
NA	87
NA	103
NA	114
NA	107
NA	88
131	NA
NA	101
NA	126
139	NA
NA	106
NA	127
NA	105
NA	99
NA	136
NA	121
NA	123
109	NA
NA	108
104	NA
NA	107
NA	121
121	NA
101	NA
NA	99
103	NA
NA	97
131	NA
NA	115
NA	107
97	NA
101	NA
111	NA
106	NA
NA	118
NA	104
111	NA
NA	106
102	NA
NA	92
128	NA
98	NA
NA	120
111	NA
124	NA
117	NA
NA	124
89	NA
NA	115
NA	122
137	NA
117	NA
123	NA
NA	106
NA	88
NA	131
83	NA
NA	103
134	NA
NA	115
NA	116
NA	102
NA	134
NA	122
138	NA
NA	89
NA	129
NA	115
107	NA
104	NA
119	NA
121	NA
114	NA
128	NA
NA	123
NA	97
NA	68
NA	105
NA	120
105	NA
NA	94
NA	101
118	NA
NA	119
113	NA
84	NA
NA	139
NA	112
NA	118
NA	94
NA	115
NA	139
NA	107
NA	97
121	NA
NA	118
NA	129
NA	90
NA	124
NA	104
NA	121
124	NA
NA	104
NA	66
NA	113
NA	134
NA	122
110	NA
119	NA
82	NA
NA	121
106	NA
108	NA
105	NA
NA	98
133	NA
NA	111
NA	111
84	NA
NA	124
NA	120
NA	129
121	NA
116	NA
102	NA
103	NA
NA	123
97	NA
NA	116
90	NA
NA	98
119	NA
NA	116
123	NA
118	NA
NA	151
103	NA
NA	119
NA	106
NA	108
NA	121
NA	94
83	NA
NA	106
106	NA
99	NA
92	NA
NA	115
126	NA
NA	82
110	NA
116	NA
124	NA
120	NA
NA	119
NA	104
NA	135
NA	113
123	NA
89	NA
NA	82
116	NA
101	NA
107	NA
126	NA
NA	38
NA	109
122	NA
110	NA
NA	125
108	NA
NA	122
NA	74
NA	117
114	NA
NA	118
NA	114
NA	123
130	NA
129	NA
127	NA
NA	92
NA	90
89	NA
NA	125
NA	108
112	NA
132	NA
130	NA
NA	107
NA	112
115	NA
93	NA
118	NA
NA	128
NA	132
113	NA
125	NA
108	NA
NA	143
NA	119
NA	117
NA	113
121	NA
NA	127
NA	59
NA	129
136	NA
130	NA
NA	117
89	NA
NA	110
NA	99
NA	131
96	NA
NA	87
126	NA
NA	126
NA	124
115	NA
NA	110
63	NA
NA	90
121	NA
NA	126
140	NA
116	NA
NA	92
NA	87
124	NA
NA	81
NA	116
113	NA
NA	101
83	NA
152	NA
NA	129
NA	127
129	NA
NA	118
120	NA
123	NA
NA	121
94	NA
120	NA
NA	95
NA	120
NA	94
118	NA
NA	90
NA	115
NA	114
NA	117
110	NA
NA	113
31	NA
117	NA
NA	107
113	NA
NA	102
125	NA
84	NA
NA	109
118	NA
NA	114
NA	127
103	NA
113	NA
106	NA
NA	122
110	NA
NA	113
NA	116
NA	127
NA	116
113	NA
NA	95
100	NA
NA	91
109	NA
127	NA
93	NA
128	NA
120	NA
110	NA
NA	135
NA	99
NA	101
131	NA
101	NA
101	NA
111	NA
126	NA
NA	135
NA	96
NA	112
NA	128
120	NA
NA	95
116	NA
NA	83
NA	130
118	NA
NA	148
106	NA
111	NA
116	NA
112	NA
137	NA
133	NA
NA	101
122	NA
87	NA
NA	108
NA	136
NA	126
NA	98
119	NA
NA	99
NA	101
108	NA
106	NA
132	NA
99	NA
NA	118
117	NA
117	NA
120	NA
100	NA
123	NA
96	NA
NA	106
NA	137
NA	107
106	NA
134	NA
NA	122
136	NA
NA	117
NA	108
NA	133
NA	110
NA	129
120	NA
98	NA
131	NA
129	NA
137	NA
NA	120
105	NA
123	NA
NA	124
124	NA
143	NA
NA	128
114	NA
NA	124
NA	96
107	NA
NA	128
134	NA
NA	144
106	NA
NA	118
NA	110
NA	101
133	NA
NA	132
NA	98
112	NA
NA	92
NA	130
NA	112
NA	116
136	NA
NA	76
141	NA
125	NA
NA	98
112	NA
NA	112
NA	127
105	NA
134	NA
NA	98
NA	107
NA	125
NA	71
105	NA
NA	110
NA	92
NA	136
NA	109
120	NA
113	NA
NA	91
102	NA
NA	122
NA	121
126	NA
NA	131
123	NA
NA	127
116	NA
122	NA
NA	126
NA	88
NA	136
NA	124
157	NA
113	NA
NA	117
135	NA
NA	96
114	NA
NA	113
NA	120
NA	99
NA	90
NA	107
NA	131
NA	132
NA	105
125	NA
NA	121
119	NA
136	NA
NA	141
NA	128
NA	126
NA	144
NA	71
NA	128
NA	104
123	NA
NA	132
NA	105
NA	102
119	NA
NA	151
NA	69
NA	103
NA	122
128	NA
NA	133
NA	110
104	NA
137	NA
NA	118
NA	102
NA	98
NA	130
113	NA
NA	113
124	NA




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Sir Maurice George Kendall' @ kendall.wessa.net

\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 & 1 seconds \tabularnewline
R Server & 'Sir Maurice George Kendall' @ kendall.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=262913&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]1 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Sir Maurice George Kendall' @ kendall.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=262913&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=262913&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 time1 seconds
R Server'Sir Maurice George Kendall' @ kendall.wessa.net







\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
TM & 82 & 106 & 116 & 124 & 149 \tabularnewline
TF & 69 & 102 & 114 & 124 & 151 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=262913&T=1

[TABLE]
[ROW][C]Boxplot statistics[/C][/ROW]
[ROW][C]Variable[/C][C]lower whisker[/C][C]lower hinge[/C][C]median[/C][C]upper hinge[/C][C]upper whisker[/C][/ROW]
[ROW][C]TM[/C][C]82[/C][C]106[/C][C]116[/C][C]124[/C][C]149[/C][/ROW]
[ROW][C]TF[/C][C]69[/C][C]102[/C][C]114[/C][C]124[/C][C]151[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=262913&T=1

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

As an alternative you can also use a QR Code:  

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

Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
TM82106116124149
TF69102114124151







Boxplot Notches
Variablelower boundmedianupper bound
TM114.069367000489116117.930632999511
TF111.91897323385114116.08102676615

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
TM & 114.069367000489 & 116 & 117.930632999511 \tabularnewline
TF & 111.91897323385 & 114 & 116.08102676615 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=262913&T=2

[TABLE]
[ROW][C]Boxplot Notches[/C][/ROW]
[ROW][C]Variable[/C][C]lower bound[/C][C]median[/C][C]upper bound[/C][/ROW]
[ROW][C]TM[/C][C]114.069367000489[/C][C]116[/C][C]117.930632999511[/C][/ROW]
[ROW][C]TF[/C][C]111.91897323385[/C][C]114[/C][C]116.08102676615[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=262913&T=2

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

As an alternative you can also use a QR Code:  

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

Boxplot Notches
Variablelower boundmedianupper bound
TM114.069367000489116117.930632999511
TF111.91897323385114116.08102676615



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