Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*The author of this computation has been verified*

R Software Module

rwasp_notchedbox1.wasp

Title produced by software

Notched Boxplots

Date of computation

Fri, 12 Dec 2014 09:42:45 +0000

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2014/Dec/12/t14183773704g75g6cqwgvwbk1.htm/, Retrieved Sun, 19 May 2024 13:03:40 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=266452, Retrieved Sun, 19 May 2024 13:03:40 +0000

QR Codes:

Paste this QR Code to cite your computation.

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords

Estimated Impact

115

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)

-       [Notched Boxplots] [] [2014-12-12 09:42:45] [478aede7ebf40ce01402b5cfefb74b76] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

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

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

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

As an alternative you can also use a 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 Output	view raw output of R engine
Computing time	1 seconds
R Server	'Gwilym Jenkins' @ jenkins.wessa.net

Boxplot statistics
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
IS	31	48	53	59.5	74
IB	30	47	54	60	76
AMS.I	29	47	54	60	76

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
IS & 31 & 48 & 53 & 59.5 & 74 \tabularnewline
IB & 30 & 47 & 54 & 60 & 76 \tabularnewline
AMS.I & 29 & 47 & 54 & 60 & 76 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=266452&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]IS[/C][C]31[/C][C]48[/C][C]53[/C][C]59.5[/C][C]74[/C][/ROW]
[ROW][C]IB[/C][C]30[/C][C]47[/C][C]54[/C][C]60[/C][C]76[/C][/ROW]
[ROW][C]AMS.I[/C][C]29[/C][C]47[/C][C]54[/C][C]60[/C][C]76[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=266452&T=1

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

As an alternative you can also use a QR Code:

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

Boxplot statistics
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
IS	31	48	53	59.5	74
IB	30	47	54	60	76
AMS.I	29	47	54	60	76

Boxplot Notches
Variable	lower bound	median	upper bound
IS	51.4805482678171	53	54.5194517321829
IB	52.2321982681978	54	55.7678017318022
AMS.I	52.768092664421	54	55.231907335579

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
IS & 51.4805482678171 & 53 & 54.5194517321829 \tabularnewline
IB & 52.2321982681978 & 54 & 55.7678017318022 \tabularnewline
AMS.I & 52.768092664421 & 54 & 55.231907335579 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=266452&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]IS[/C][C]51.4805482678171[/C][C]53[/C][C]54.5194517321829[/C][/ROW]
[ROW][C]IB[/C][C]52.2321982681978[/C][C]54[/C][C]55.7678017318022[/C][/ROW]
[ROW][C]AMS.I[/C][C]52.768092664421[/C][C]54[/C][C]55.231907335579[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=266452&T=2

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

As an alternative you can also use a QR Code:

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

Boxplot Notches
Variable	lower bound	median	upper bound
IS	51.4805482678171	53	54.5194517321829
IB	52.2321982681978	54	55.7678017318022
AMS.I	52.768092664421	54	55.231907335579

Figure 1

PNG link

Postscript link

PDF link

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

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code