FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_notchedbox1.wasp
Title produced by softwareNotched Boxplots
Date of computationThu, 12 Nov 2009 09:48:40 -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/12/t1258045052kfyk8cs06iz3lib.htm/, Retrieved Fri, 03 May 2024 21:48:11 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=56225, Retrieved Fri, 03 May 2024 21:48:11 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywordsbouvergunning, woongebouwen, België, Vlaanderen, Wallonië, Brussel
Estimated Impact142

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Notched Boxplots] [bouwvergunning va...] [2009-11-12 16:48:40] [09bbdaa13608b41d3e388e84e1f7dd72] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
5560	4085	1209	266
3922	2686	1036	200
3759	2545	1084	130
4138	3071	926	141
4634	3388	1083	163
3996	2652	912	432
4308	3190	910	208
4143	2885	886	372
4429	3295	948	186
5219	3818	1134	267
4929	3226	1226	477
5755	3953	1516	286
5592	3810	1491	291
4163	2877	1086	200
4962	3515	1274	173
5208	3708	1164	336
4755	3450	1205	100
4491	3360	966	165
5732	4110	1462	160
5731	4385	1134	212
5040	3729	1157	154
6102	4309	1676	117
4904	3506	1168	230
5369	3690	1492	187
5578	3911	1413	254
4619	2952	1287	380
4731	3324	1206	201
5011	3417	1054	540
5299	3498	1237	564
4146	2770	1070	306
4625	2907	1264	454
4736	3179	1319	238
4219	3014	1095	110
5116	3483	1497	136
4205	3016	1136	53
4121	2617	1343	161
5103	3534	1343	226
4300	2849	1283	168
4578	3129	1307	142
3809	2578	913	318
5526	3626	1396	504
4247	2813	1186	248
3830	2591	1021	218
4394	2890	1250	254
4826	3369	1248	209
4409	2926	1305	178
4569	3016	1511	42
4106	2878	1103	124
4794	3198	1322	274
3914	2560	1153	201
3793	2573	1096	125
4405	3121	1106	178
4022	2658	1249	115
4100	2869	1016	216
4788	3076	1076	637
3163	2168	939	56
3585	2341	928	316
3903	2570	1142	191
4178	2626	1019	533
3863	2490	978	396
4187	2756	1327	104

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'RServer@AstonUniversity' @ vre.aston.ac.uk

\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 & 'RServer@AstonUniversity' @ vre.aston.ac.uk \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=56225&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]'RServer@AstonUniversity' @ vre.aston.ac.uk[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=56225&T=0

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

As an alternative you can also use a QR Code:  
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'RServer@AstonUniversity' @ vre.aston.ac.uk






Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
Belgë31634138449150116102
VL21682770307634984385
Wal8861070116413051516
Brus42160208291477

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
Belgë & 3163 & 4138 & 4491 & 5011 & 6102 \tabularnewline
VL & 2168 & 2770 & 3076 & 3498 & 4385 \tabularnewline
Wal & 886 & 1070 & 1164 & 1305 & 1516 \tabularnewline
Brus & 42 & 160 & 208 & 291 & 477 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=56225&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]Belgë[/C][C]3163[/C][C]4138[/C][C]4491[/C][C]5011[/C][C]6102[/C][/ROW]
[ROW][C]VL[/C][C]2168[/C][C]2770[/C][C]3076[/C][C]3498[/C][C]4385[/C][/ROW]
[ROW][C]Wal[/C][C]886[/C][C]1070[/C][C]1164[/C][C]1305[/C][C]1516[/C][/ROW]
[ROW][C]Brus[/C][C]42[/C][C]160[/C][C]208[/C][C]291[/C][C]477[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=56225&T=1

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

As an alternative you can also use a QR Code:  
QR Code


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

Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
Belgë31634138449150116102
VL21682770307634984385
Wal8861070116413051516
Brus42160208291477






Boxplot Notches
Variablelower boundmedianupper bound
Belgë4314.3936100333644914667.60638996664
VL2928.7268592259930763223.27314077401
Wal1116.4599064809211641211.54009351908
Brus181.498926591489208234.501073408511

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
Belgë & 4314.39361003336 & 4491 & 4667.60638996664 \tabularnewline
VL & 2928.72685922599 & 3076 & 3223.27314077401 \tabularnewline
Wal & 1116.45990648092 & 1164 & 1211.54009351908 \tabularnewline
Brus & 181.498926591489 & 208 & 234.501073408511 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=56225&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]Belgë[/C][C]4314.39361003336[/C][C]4491[/C][C]4667.60638996664[/C][/ROW]
[ROW][C]VL[/C][C]2928.72685922599[/C][C]3076[/C][C]3223.27314077401[/C][/ROW]
[ROW][C]Wal[/C][C]1116.45990648092[/C][C]1164[/C][C]1211.54009351908[/C][/ROW]
[ROW][C]Brus[/C][C]181.498926591489[/C][C]208[/C][C]234.501073408511[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=56225&T=2

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

As an alternative you can also use a QR Code:  
QR Code


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

Boxplot Notches
Variablelower boundmedianupper bound
Belgë4314.3936100333644914667.60638996664
VL2928.7268592259930763223.27314077401
Wal1116.4599064809211641211.54009351908
Brus181.498926591489208234.501073408511


Figures (Output of Computation)

Input Parameters & R Code

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