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:23:55 +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/t14184878572p07a137hn59tj8.htm/, Retrieved Thu, 16 May 2024 13:04:29 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=267206, Retrieved Thu, 16 May 2024 13:04:29 +0000
QR Codes:

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

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 boxplotsgeslacht] [2014-12-13 16:23:55] [9772ee27deeac3d50cc1fb84835cd7d6] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
26 57 50 62
51 67 68 71
37 43 54 54
52 52 73 65
58 43 73 52
68 84 75 84
62 67 72 42
56 49 70 66
74 70 81 65
58 52 71 78
51 43 61 66
53 56 76 61
29 65 70 71
54 63 60 69
54 57 70 72
47 63 76 68
68 53 67 70
67 57 76 68
41 64 75 67
45 51 63 77
56 58 70 72
41 43 75 69
53 51 60 71
66 53 73 62
37 56 64 64
51 61 59 58
51 39 64 52
56 48 60 59
37 50 78 68
42 35 67 76
66 30 66 65
34 49 68 59
49 61 66 69
55 47 73 63
49 56 72 75
40 50 59 63
63 43 78 60
56 67 68 73
54 62 73 63
32 57 65 70
67 54 71 66
66 48 76 63
51 61 63 64
55 43 59 61
50 44 73 62
60 58 66 61
56 46 62 66
63 66 69 56
52 45 57 66
59 59 63 53
52 38 65 59
44 53 47 71
60 59 68 71
59 58 71 64
55 60 59 66
55 52 68 62
41 34 48 65
51 69 59 68
52 48 60 60
50 58 59 65
60 57 79 68
29 42 59 64
55 64 71 74
64 58 57 69
40 26 66 68
46 61 63 72
43 52 58 67
51 61 48 66
52 52 73 51
66 16 61 56
61 46 68 67
51 56 62 69
25 55 62 56
46 50 69 55
50 60 58 67
39 67 58 76
58 52 72 64
58 55 62 68
60 37 65 64
62 54 69 65
63 72 66 71
64 51 66 63
38 48 55 60
48 50 72 72
48 63 62 70
47 33 64 61
66 67 64 61
58 46 68 62
44 54 70 71
43 61 69 51
45 33 73 56
60 47 74 70
55 69 78 73
56 52 75 76
43 73 50 52
51 51 65 57
58 56 78 60
64 56 78 60
51 66 70 62
47 66 63 59
59 73 63 61
51 58 67 69
64 61 66 59
52 50 62 66
56 54 73 67
71 80 69 75
50 56 84 69
47 56 58 58
43 56 57 60
63 53 68 74
51 47 69 55
22 47 60 63
59 51 66 68
66 35 81 62
53 53 72 72
54 46 74 62
53 67 65 75
36 59 51 58
76 50 80 47
59 47 74 19
55 63 70 50
58 51 69 79
44 55 55 71
57 38 71 48
NA 56 NA 66
NA 50 NA 74
NA 54 NA 66
NA 57 NA 71
NA 49 NA 53
NA 37 NA 60
NA 59 NA 70
NA 46 NA 69
NA 53 NA 59
NA 48 NA 72
NA 62 NA 71
NA 62 NA 74
NA 67 NA 80
NA 50 NA 73
NA 54 NA 67
NA 58 NA 61
NA 63 NA 74
NA 31 NA 32
NA 65 NA 69
NA 57 NA 64
NA 54 NA 60
NA 47 NA 59
NA 57 NA 78
NA 41 NA 60
NA 63 NA 68
NA 56 NA 73
NA 50 NA 67
NA 41 NA 65
NA 56 NA 74
NA 42 NA 55
NA 52 NA 49
NA 44 NA 53
NA 62 NA 64
NA 50 NA 57
NA 66 NA 67
NA 62 NA 70
NA 47 NA 75
NA 60 NA 65
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 time1 seconds
R Server'George Udny Yule' @ yule.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 & 'George Udny Yule' @ yule.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=267206&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]'George Udny Yule' @ yule.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=267206&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=267206&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'George Udny Yule' @ yule.wessa.net






Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
AMS.IF2947535976
AMS.IM30485460.573
AMS.EF476267.57284
AMS.EM4760657084

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
AMS.IF & 29 & 47 & 53 & 59 & 76 \tabularnewline
AMS.IM & 30 & 48 & 54 & 60.5 & 73 \tabularnewline
AMS.EF & 47 & 62 & 67.5 & 72 & 84 \tabularnewline
AMS.EM & 47 & 60 & 65 & 70 & 84 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=267206&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.IF[/C][C]29[/C][C]47[/C][C]53[/C][C]59[/C][C]76[/C][/ROW]
[ROW][C]AMS.IM[/C][C]30[/C][C]48[/C][C]54[/C][C]60.5[/C][C]73[/C][/ROW]
[ROW][C]AMS.EF[/C][C]47[/C][C]62[/C][C]67.5[/C][C]72[/C][C]84[/C][/ROW]
[ROW][C]AMS.EM[/C][C]47[/C][C]60[/C][C]65[/C][C]70[/C][C]84[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=267206&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=267206&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.IF2947535976
AMS.IM30485460.573
AMS.EF476267.57284
AMS.EM4760657084






Boxplot Notches
Variablelower boundmedianupper bound
AMS.IF51.29734173678625354.7026582632138
AMS.IM52.45306061127385455.5469393887262
AMS.EF66.081118113988567.568.9188818860115
AMS.EM63.7624484890196566.237551510981

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
AMS.IF & 51.2973417367862 & 53 & 54.7026582632138 \tabularnewline
AMS.IM & 52.4530606112738 & 54 & 55.5469393887262 \tabularnewline
AMS.EF & 66.0811181139885 & 67.5 & 68.9188818860115 \tabularnewline
AMS.EM & 63.762448489019 & 65 & 66.237551510981 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=267206&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.IF[/C][C]51.2973417367862[/C][C]53[/C][C]54.7026582632138[/C][/ROW]
[ROW][C]AMS.IM[/C][C]52.4530606112738[/C][C]54[/C][C]55.5469393887262[/C][/ROW]
[ROW][C]AMS.EF[/C][C]66.0811181139885[/C][C]67.5[/C][C]68.9188818860115[/C][/ROW]
[ROW][C]AMS.EM[/C][C]63.762448489019[/C][C]65[/C][C]66.237551510981[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=267206&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=267206&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.IF51.29734173678625354.7026582632138
AMS.IM52.45306061127385455.5469393887262
AMS.EF66.081118113988567.568.9188818860115
AMS.EM63.7624484890196566.237551510981


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