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 computationSat, 13 Dec 2014 16:29:14 +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/13/t1418488183brnxpxqmj8wv3y9.htm/, Retrieved Sun, 19 May 2024 15:51:36 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=267213, Retrieved Sun, 19 May 2024 15:51:36 +0000
QR Codes:

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

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Survey Scores] [Intrinsic Motivat...] [2010-10-12 11:18:40] [b98453cac15ba1066b407e146608df68]
- RMP   [Survey Scores] [] [2014-10-09 22:08:50] [32b17a345b130fdf5cc88718ed94a974]
-    D    [Survey Scores] [P IM kwal-kwan] [2014-12-10 19:22:20] [46c7ebd23dbdec306a09830d8b7528e7]
-    D      [Survey Scores] [P IM2 kwal-kwan] [2014-12-12 18:04:48] [46c7ebd23dbdec306a09830d8b7528e7]
-    D        [Survey Scores] [p IM2 kwal-kwan] [2014-12-13 09:43:47] [46c7ebd23dbdec306a09830d8b7528e7]
-    D          [Survey Scores] [P EM1 kwan kwal] [2014-12-13 09:59:49] [46c7ebd23dbdec306a09830d8b7528e7]
-    D            [Survey Scores] [P EM2 kwan kwal] [2014-12-13 10:15:42] [46c7ebd23dbdec306a09830d8b7528e7]
-    D              [Survey Scores] [P EM3 kwan kwal] [2014-12-13 10:39:45] [46c7ebd23dbdec306a09830d8b7528e7]
- RMPD                  [Notched Boxplots] [p boxplotsjaar] [2014-12-13 16:29:14] [9772ee27deeac3d50cc1fb84835cd7d6] [Current]
Feedback Forum

Post a new message

Dataset

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

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'Sir Ronald Aylmer Fisher' @ fisher.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 & 'Sir Ronald Aylmer Fisher' @ fisher.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=267213&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]'Sir Ronald Aylmer Fisher' @ fisher.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=267213&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=267213&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'Sir Ronald Aylmer Fisher' @ fisher.wessa.net






Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
AMS.I201129475460.574
AMS.I20122947545976
AMS.E20115062.5677181
AMS.E20124759.5657184

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
AMS.I2011 & 29 & 47 & 54 & 60.5 & 74 \tabularnewline
AMS.I2012 & 29 & 47 & 54 & 59 & 76 \tabularnewline
AMS.E2011 & 50 & 62.5 & 67 & 71 & 81 \tabularnewline
AMS.E2012 & 47 & 59.5 & 65 & 71 & 84 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=267213&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]AMS.I2011[/C][C]29[/C][C]47[/C][C]54[/C][C]60.5[/C][C]74[/C][/ROW]
[ROW][C]AMS.I2012[/C][C]29[/C][C]47[/C][C]54[/C][C]59[/C][C]76[/C][/ROW]
[ROW][C]AMS.E2011[/C][C]50[/C][C]62.5[/C][C]67[/C][C]71[/C][C]81[/C][/ROW]
[ROW][C]AMS.E2012[/C][C]47[/C][C]59.5[/C][C]65[/C][C]71[/C][C]84[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=267213&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=267213&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
AMS.I201129475460.574
AMS.I20122947545976
AMS.E20115062.5677181
AMS.E20124759.5657184






Boxplot Notches
Variablelower boundmedianupper bound
AMS.I201152.01955921834175455.9804407816583
AMS.I201252.55009256193815455.4499074380619
AMS.E201165.75305580414116768.2469441958589
AMS.E201263.61050537185736566.3894946281427

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
AMS.I2011 & 52.0195592183417 & 54 & 55.9804407816583 \tabularnewline
AMS.I2012 & 52.5500925619381 & 54 & 55.4499074380619 \tabularnewline
AMS.E2011 & 65.7530558041411 & 67 & 68.2469441958589 \tabularnewline
AMS.E2012 & 63.6105053718573 & 65 & 66.3894946281427 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=267213&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]AMS.I2011[/C][C]52.0195592183417[/C][C]54[/C][C]55.9804407816583[/C][/ROW]
[ROW][C]AMS.I2012[/C][C]52.5500925619381[/C][C]54[/C][C]55.4499074380619[/C][/ROW]
[ROW][C]AMS.E2011[/C][C]65.7530558041411[/C][C]67[/C][C]68.2469441958589[/C][/ROW]
[ROW][C]AMS.E2012[/C][C]63.6105053718573[/C][C]65[/C][C]66.3894946281427[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=267213&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=267213&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
AMS.I201152.01955921834175455.9804407816583
AMS.I201252.55009256193815455.4499074380619
AMS.E201165.75305580414116768.2469441958589
AMS.E201263.61050537185736566.3894946281427


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
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')