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

Tue, 09 Dec 2014 13:51:06 +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/09/t1418133075ni7nw4fguxangdd.htm/, Retrieved Thu, 16 May 2024 11:21:56 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=264614, Retrieved Thu, 16 May 2024 11:21:56 +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

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

F     [Histogram] [Frequency Plot (C...] [2010-09-25 09:09:15] [b98453cac15ba1066b407e146608df68]
- RM D  [Histogram] [Frequency plot] [2014-10-01 11:48:47] [d253a55552bf9917a397def3be261e30]
- RMPD      [Notched Boxplots] [] [2014-12-09 13:51:06] [08b6b59c0a3564dc58beca6de73ddb7e] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

NA 50
62 NA
NA 54
71 NA
54 NA
65 NA
NA 73
52 NA
84 NA
42 NA
66 NA
65 NA
78 NA
NA 73
NA 75
NA 72
66 NA
NA 70
61 NA
NA 81
71 NA
69 NA
NA 71
72 NA
68 NA
70 NA
68 NA
NA 61
67 NA
NA 76
NA 70
NA 60
72 NA
69 NA
71 NA
62 NA
NA 70
64 NA
58 NA
NA 76
52 NA
59 NA
68 NA
76 NA
65 NA
NA 67
59 NA
69 NA
NA 76
63 NA
75 NA
63 NA
60 NA
73 NA
63 NA
70 NA
NA 75
66 NA
NA 63
63 NA
64 NA
NA 70
NA 75
61 NA
NA 60
62 NA
NA 73
61 NA
66 NA
NA 64
NA 59
NA 64
NA 60
56 NA
NA 78
53 NA
NA 67
59 NA
NA 66
NA 68
71 NA
NA 66
NA 73
NA 72
71 NA
NA 59
64 NA
66 NA
NA 78
NA 68
NA 73
62 NA
65 NA
68 NA
NA 65
60 NA
NA 71
65 NA
68 NA
64 NA
74 NA
69 NA
NA 76
68 NA
72 NA
67 NA
NA 63
NA 59
NA 73
NA 66
NA 62
NA 69
66 NA
51 NA
56 NA
67 NA
69 NA
NA 57
56 NA
55 NA
NA 63
67 NA
NA 65
NA 47
76 NA
64 NA
68 NA
64 NA
65 NA
71 NA
63 NA
60 NA
NA 68
72 NA
70 NA
61 NA
61 NA
62 NA
71 NA
NA 71
51 NA
56 NA
70 NA
73 NA
76 NA
NA 68
NA 48
52 NA
NA 60
NA 59
57 NA
NA 79
60 NA
60 NA
NA 59
62 NA
59 NA
61 NA
NA 71
NA 57
NA 66
NA 63
69 NA
NA 58
59 NA
NA 48
66 NA
NA 73
67 NA
NA 61
NA 68
75 NA
NA 62
69 NA
58 NA
60 NA
74 NA
55 NA
NA 62
63 NA
NA 69
NA 58
NA 58
68 NA
NA 72
62 NA
NA 62
NA 65
NA 69
NA 66
72 NA
62 NA
75 NA
58 NA
NA 66
NA 55
47 NA
NA 72
NA 62
NA 64
NA 64
19 NA
50 NA
NA 68
NA 70
79 NA
NA 69
71 NA
48 NA
NA 73
74 NA
66 NA
71 NA
NA 74
NA 78
NA 75
53 NA
60 NA
70 NA
69 NA
NA 65
NA 78
NA 78
59 NA
72 NA
NA 70
NA 63
NA 63
71 NA
74 NA
NA 67
NA 66
NA 62
80 NA
73 NA
67 NA
61 NA
NA 73
74 NA
32 NA
69 NA
NA 69
NA 84
64 NA
NA 58
59 NA
78 NA
NA 57
60 NA
NA 68
68 NA
73 NA
NA 69
67 NA
NA 60
65 NA
NA 66
74 NA
NA 81
NA 72
55 NA
49 NA
NA 74
53 NA
64 NA
NA 65
57 NA
NA 51
NA 80
67 NA
70 NA
NA 74
75 NA
NA 70
NA 69
65 NA
NA 55
NA 71
65 NA

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=264614&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	'Sir Maurice George Kendall' @ kendall.wessa.net

Boxplot statistics
Variable	lower whisker	lower hinge	median	upper hinge	upper whisker
AMS.E.M	47	60	65	70	84
AMS.E.F	47	62	68	72.5	84

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
AMS.E.M & 47 & 60 & 65 & 70 & 84 \tabularnewline
AMS.E.F & 47 & 62 & 68 & 72.5 & 84 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=264614&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.E.M[/C][C]47[/C][C]60[/C][C]65[/C][C]70[/C][C]84[/C][/ROW]
[ROW][C]AMS.E.F[/C][C]47[/C][C]62[/C][C]68[/C][C]72.5[/C][C]84[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=264614&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=264614&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
AMS.E.M	47	60	65	70	84
AMS.E.F	47	62	68	72.5	84

Boxplot Notches
Variable	lower bound	median	upper bound
AMS.E.M	63.7469784945653	65	66.2530215054347
AMS.E.F	66.4855471284982	68	69.5144528715018

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
AMS.E.M & 63.7469784945653 & 65 & 66.2530215054347 \tabularnewline
AMS.E.F & 66.4855471284982 & 68 & 69.5144528715018 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=264614&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.E.M[/C][C]63.7469784945653[/C][C]65[/C][C]66.2530215054347[/C][/ROW]
[ROW][C]AMS.E.F[/C][C]66.4855471284982[/C][C]68[/C][C]69.5144528715018[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=264614&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=264614&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
AMS.E.M	63.7469784945653	65	66.2530215054347
AMS.E.F	66.4855471284982	68	69.5144528715018

Figure 1

PNG link

Postscript link

PDF link

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

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code