Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_notchedbox1.wasp
Title produced by softwareNotched Boxplots
Date of computationMon, 15 Dec 2014 13:40:49 +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/15/t1418650949xftwwpecn48hzc9.htm/, Retrieved Fri, 01 Nov 2024 01:01:12 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=268371, Retrieved Fri, 01 Nov 2024 01:01:12 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact103
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Notched Boxplots] [Verschil in Total...] [2014-12-15 13:40:49] [5848e943dc403117a4a7bf00dc78acfc] [Current]
Feedback Forum

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




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Sir Maurice George Kendall' @ kendall.wessa.net
R Framework error message
The field 'Names of X columns' contains a hard return which cannot be interpreted.
Please, resubmit your request without hard returns in the 'Names of X columns'.

\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
R Framework error message & 
The field 'Names of X columns' contains a hard return which cannot be interpreted.
Please, resubmit your request without hard returns in the 'Names of X columns'.
\tabularnewline \hline \end{tabular} %Source: https://freestatistics.org/blog/index.php?pk=268371&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]
[ROW][C]R Framework error message[/C][C]
The field 'Names of X columns' contains a hard return which cannot be interpreted.
Please, resubmit your request without hard returns in the 'Names of X columns'.
[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=268371&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=268371&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 Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Sir Maurice George Kendall' @ kendall.wessa.net
R Framework error message
The field 'Names of X columns' contains a hard return which cannot be interpreted.
Please, resubmit your request without hard returns in the 'Names of X columns'.







Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
IM3047546077
IF2947546077
EM4760.5667184
EF 4863687384

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
IM & 30 & 47 & 54 & 60 & 77 \tabularnewline
IF & 29 & 47 & 54 & 60 & 77 \tabularnewline
EM & 47 & 60.5 & 66 & 71 & 84 \tabularnewline
EF
 & 48 & 63 & 68 & 73 & 84 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=268371&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]IM[/C][C]30[/C][C]47[/C][C]54[/C][C]60[/C][C]77[/C][/ROW]
[ROW][C]IF[/C][C]29[/C][C]47[/C][C]54[/C][C]60[/C][C]77[/C][/ROW]
[ROW][C]EM[/C][C]47[/C][C]60.5[/C][C]66[/C][C]71[/C][C]84[/C][/ROW]
[ROW][C]EF
[/C][C]48[/C][C]63[/C][C]68[/C][C]73[/C][C]84[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=268371&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=268371&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
Variablelower whiskerlower hingemedianupper hingeupper whisker
IM3047546077
IF2947546077
EM4760.5667184
EF 4863687384







Boxplot Notches
Variablelower boundmedianupper bound
IM52.76139139647465455.2386086035254
IF52.5893070082475455.410692991753
EM64.9995853586916667.000414641309
EF 66.91485154480546869.0851484551946

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
IM & 52.7613913964746 & 54 & 55.2386086035254 \tabularnewline
IF & 52.589307008247 & 54 & 55.410692991753 \tabularnewline
EM & 64.999585358691 & 66 & 67.000414641309 \tabularnewline
EF
 & 66.9148515448054 & 68 & 69.0851484551946 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=268371&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]IM[/C][C]52.7613913964746[/C][C]54[/C][C]55.2386086035254[/C][/ROW]
[ROW][C]IF[/C][C]52.589307008247[/C][C]54[/C][C]55.410692991753[/C][/ROW]
[ROW][C]EM[/C][C]64.999585358691[/C][C]66[/C][C]67.000414641309[/C][/ROW]
[ROW][C]EF
[/C][C]66.9148515448054[/C][C]68[/C][C]69.0851484551946[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=268371&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=268371&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
Variablelower boundmedianupper bound
IM52.76139139647465455.2386086035254
IF52.5893070082475455.410692991753
EM64.9995853586916667.000414641309
EF 66.91485154480546869.0851484551946



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