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 computationWed, 10 Dec 2014 15:41:37 +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/10/t1418226143l3tsz3xuxyahggk.htm/, Retrieved Sun, 19 May 2024 12:57:50 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=265416, Retrieved Sun, 19 May 2024 12:57:50 +0000
QR Codes:

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

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Paired and Unpaired Two Samples Tests about the Mean] [] [2014-12-10 13:18:02] [fa1b8827d7de91b8b87087311d3d9fa1]
- RM D    [Notched Boxplots] [] [2014-12-10 15:41:37] [c4557137b9b718365486b3b7af9cd43b] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
57	26
67	37
43	52
52	58
43	68
84	62
67	56
49	74
70	58
52	51
43	53
56	29
65	54
63	54
57	47
63	68
53	67
57	41
64	45
58	56
43	41
51	53
53	66
56	37
61	51
39	51
48	56
50	37
35	42
30	66
49	34
61	49
47	55
56	49
50	40
43	63
67	56
62	54
57	32
54	67
48	66
61	51
43	55
44	50
58	60
46	56
66	63
38	52
53	59
59	52
58	44
60	60
52	59
34	55
69	41
48	52
58	50
57	60
42	29
64	55
58	64
26	40
61	46
52	43
61	51
52	52
16	66
46	61
56	51
55	25
50	46
60	50
67	39
52	58
55	58
37	60
54	62
72	63
51	64
48	38
50	48
63	48
33	47
67	66
46	58
54	44
61	43
33	45
47	60
69	55
52	56
73	51
51	58
56	64
56	51
66	47
66	59
73	51
58	64
61	52
50	56
54	71
80	50
56	47
56	43
56	63
53	51
47	22
47	59
51	66
35	53
53	54
46	53
67	36
59	76
50	59
47	55
63	58
51	44
55	57
38	
50	
54	
57	
49	
37	
59	
46	
53
48
62
62
67
50
54
58
63
31
65
57
47
57
41
63
56
50
41
56
42
52
44
62
50
66
62
47
60
45

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time0 seconds
R Server'Gwilym Jenkins' @ jenkins.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 & 0 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ jenkins.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=265416&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]0 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Gwilym Jenkins' @ jenkins.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=265416&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=265416&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 time0 seconds
R Server'Gwilym Jenkins' @ jenkins.wessa.net






\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
Man & 30 & 48 & 54.5 & 61 & 80 \tabularnewline
Vrouw & 29 & 47 & 53 & 59 & 76 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=265416&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]Man[/C][C]30[/C][C]48[/C][C]54.5[/C][C]61[/C][C]80[/C][/ROW]
[ROW][C]Vrouw[/C][C]29[/C][C]47[/C][C]53[/C][C]59[/C][C]76[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=265416&T=1

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






Boxplot Notches
Variablelower boundmedianupper bound
Man52.865925338303154.556.1340746616969
Vrouw51.49162338920285354.5083766107972

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
Man & 52.8659253383031 & 54.5 & 56.1340746616969 \tabularnewline
Vrouw & 51.4916233892028 & 53 & 54.5083766107972 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=265416&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]Man[/C][C]52.8659253383031[/C][C]54.5[/C][C]56.1340746616969[/C][/ROW]
[ROW][C]Vrouw[/C][C]51.4916233892028[/C][C]53[/C][C]54.5083766107972[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=265416&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=265416&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
Man52.865925338303154.556.1340746616969
Vrouw51.49162338920285354.5083766107972


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = 1 ; par2 = 2 ; par3 = FALSE ;
Parameters (R input):
par1 = red ;
R code (references can be found in the software module):
par1 <- 'red'
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')