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, 21 Dec 2017 21:04:00 +0100
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2017/Dec/21/t1513886648k5vp7ll8z88z4bx.htm/, Retrieved Mon, 13 May 2024 21:20:33 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=310707, Retrieved Mon, 13 May 2024 21:20:33 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact49

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Notched Boxplots] [Paper] [2017-12-21 20:04:00] [2fb711e06e7eb81d34c9e51edb934d8a] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
57000	27000
40200	18750
21450	12000
21900	13200
45000	21000
32100	13500
36000	18750
21900	9750
27900	12750
24000	13500
30300	16500
28350	12000
27750	14250
35100	16800
27300	13500
40800	15000
46000	14250
103750	27510
42300	14250
26250	11550
38850	15000
21750	12750
24000	11100
16950	9000
21150	9000
31050	12600
60375	27480
32550	14250
135000	79980
31200	14250
36150	14250
110625	45000
42000	15000
92000	39990
81250	30000
31350	11250
29100	13500
31350	15000
36000	15000
19200	9000
23550	11550
35100	16500
23250	14250
29250	14250
30750	13500
22350	12750
30000	16500
30750	14100
34800	16500
60000	23730
35550	15000
45150	15000
73750	26250
25050	13500
27000	15000
26850	13500
33900	15750
26400	13500
28050	14250
30900	15000
22500	9750
48000	21750
55000	26250
53125	21000
21900	14550
78125	30000
46000	21240
45250	21480
56550	25000
41100	20250
82500	34980
54000	18000
26400	10500
33900	19500
24150	11550
29250	11550
27600	11400
22950	10500
34800	14550
51000	18000
24300	10950
24750	14250
22950	11250
25050	10950
25950	17100
31650	15750
24150	14100
72500	28740
68750	27480
16200	9750
20100	11250
24000	10950
25950	10950
24600	10050
28500	10500
30750	15000
40200	19500
30000	15000
22050	10950
78250	27480
60625	22500
39900	15750
97000	35010
27450	15750
31650	13500
91250	29490
25200	14400
21000	11550
30450	15000
28350	18000
30750	9000
30750	15000
54875	27480
37800	16500
33450	14100
30300	16500
31500	18750
31650	14250
25200	14100

Tables (Output of Computation)





Summary of computational transaction
Raw Input view raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R ServerBig Analytics Cloud Computing Center

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input view raw input (R code)  \tabularnewline
Raw Outputview raw output of R engine  \tabularnewline
Computing time1 seconds \tabularnewline
R ServerBig Analytics Cloud Computing Center \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=310707&T=0

[TABLE]
[ROW]
Summary of computational transaction[/C][/ROW] [ROW]Raw Input[/C] view raw input (R code) [/C][/ROW] [ROW]Raw Output[/C]view raw output of R engine [/C][/ROW] [ROW]Computing time[/C]1 seconds[/C][/ROW] [ROW]R Server[/C]Big Analytics Cloud Computing Center[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=310707&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=310707&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 Input view raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R ServerBig Analytics Cloud Computing Center






Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
Salary1620025575309004215060625
Salarybegin900012750145501875027510

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
Salary & 16200 & 25575 & 30900 & 42150 & 60625 \tabularnewline
Salarybegin & 9000 & 12750 & 14550 & 18750 & 27510 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=310707&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]Salary[/C][C]16200[/C][C]25575[/C][C]30900[/C][C]42150[/C][C]60625[/C][/ROW]
[ROW][C]Salarybegin[/C][C]9000[/C][C]12750[/C][C]14550[/C][C]18750[/C][C]27510[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=310707&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=310707&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
Salary1620025575309004215060625
Salarybegin900012750145501875027510






Boxplot Notches
Variablelower boundmedianupper bound
Salary28499.30414105773090033300.6958589423
Salarybegin13680.96982481731455015419.0301751827

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
Salary & 28499.3041410577 & 30900 & 33300.6958589423 \tabularnewline
Salarybegin & 13680.9698248173 & 14550 & 15419.0301751827 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=310707&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]Salary[/C][C]28499.3041410577[/C][C]30900[/C][C]33300.6958589423[/C][/ROW]
[ROW][C]Salarybegin[/C][C]13680.9698248173[/C][C]14550[/C][C]15419.0301751827[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=310707&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=310707&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
Salary28499.30414105773090033300.6958589423
Salarybegin13680.96982481731455015419.0301751827


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = 0 ; par2 = no ; par3 = 512 ;
Parameters (R input):
par1 = grey ; par2 = no ;
R code (references can be found in the software module):
if(par2=='yes') {
z <- na.omit(as.data.frame(t(y)))
} else {
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,'Boxplot statistics',6,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Variable',1,TRUE)
a<-table.element(a,'lower whisker',1,TRUE)
a<-table.element(a,'lower hinge',1,TRUE)
a<-table.element(a,'median',1,TRUE)
a<-table.element(a,'upper hinge',1,TRUE)
a<-table.element(a,'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')