Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_notchedbox1dm.wasp
Title produced by softwareNotched Boxplots
Date of computationThu, 26 Apr 2012 09:52:12 -0400
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2012/Apr/26/t1335448346t08ednefedz05ux.htm/, Retrieved Sun, 28 Apr 2024 18:54:07 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=164916, Retrieved Sun, 28 Apr 2024 18:54:07 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact148
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Notched Boxplots] [Notched Boxplots] [2012-04-26 12:40:42] [38c53a789d29c0853de03d9eff8ed4ee]
- R P   [Notched Boxplots] [k] [2012-04-26 13:38:04] [38c53a789d29c0853de03d9eff8ed4ee]
- R P       [Notched Boxplots] [Boxplots JAAR 1] [2012-04-26 13:52:12] [972100275af27f610aa6d6cf2b8004c8] [Current]
- R P         [Notched Boxplots] [] [2012-05-17 09:44:31] [7d86e24de0a0f8503ecffdef58e8c96c]
- R P         [Notched Boxplots] [] [2012-05-18 19:55:24] [7d86e24de0a0f8503ecffdef58e8c96c]
- R P           [Notched Boxplots] [Jaar 0] [2012-08-28 13:39:06] [52986265a8945c3b72cdef4e8a412754]
- R             [Notched Boxplots] [Jaar 1] [2012-08-28 13:44:54] [52986265a8945c3b72cdef4e8a412754]
- R P           [Notched Boxplots] [jaar 2] [2012-08-28 13:46:05] [52986265a8945c3b72cdef4e8a412754]
- R P           [Notched Boxplots] [jaar 3] [2012-08-28 13:46:56] [52986265a8945c3b72cdef4e8a412754]
Feedback Forum

Post a new message




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Gertrude Mary Cox' @ cox.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 & 'Gertrude Mary Cox' @ cox.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=164916&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]'Gertrude Mary Cox' @ cox.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=164916&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=164916&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'Gertrude Mary Cox' @ cox.wessa.net







Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
C123345
C323345
C523445
C723345
C923445
C1123445
C1323445
C1523345
C1723345
C1923345
C2112345
C2323345
C2523445
C2723455
C2923445
C3123445
C3323345
C3523345
C37233.545
C3923345
C4123445
C4323345
C4523445
C4723445

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
C1 & 2 & 3 & 3 & 4 & 5 \tabularnewline
C3 & 2 & 3 & 3 & 4 & 5 \tabularnewline
C5 & 2 & 3 & 4 & 4 & 5 \tabularnewline
C7 & 2 & 3 & 3 & 4 & 5 \tabularnewline
C9 & 2 & 3 & 4 & 4 & 5 \tabularnewline
C11 & 2 & 3 & 4 & 4 & 5 \tabularnewline
C13 & 2 & 3 & 4 & 4 & 5 \tabularnewline
C15 & 2 & 3 & 3 & 4 & 5 \tabularnewline
C17 & 2 & 3 & 3 & 4 & 5 \tabularnewline
C19 & 2 & 3 & 3 & 4 & 5 \tabularnewline
C21 & 1 & 2 & 3 & 4 & 5 \tabularnewline
C23 & 2 & 3 & 3 & 4 & 5 \tabularnewline
C25 & 2 & 3 & 4 & 4 & 5 \tabularnewline
C27 & 2 & 3 & 4 & 5 & 5 \tabularnewline
C29 & 2 & 3 & 4 & 4 & 5 \tabularnewline
C31 & 2 & 3 & 4 & 4 & 5 \tabularnewline
C33 & 2 & 3 & 3 & 4 & 5 \tabularnewline
C35 & 2 & 3 & 3 & 4 & 5 \tabularnewline
C37 & 2 & 3 & 3.5 & 4 & 5 \tabularnewline
C39 & 2 & 3 & 3 & 4 & 5 \tabularnewline
C41 & 2 & 3 & 4 & 4 & 5 \tabularnewline
C43 & 2 & 3 & 3 & 4 & 5 \tabularnewline
C45 & 2 & 3 & 4 & 4 & 5 \tabularnewline
C47 & 2 & 3 & 4 & 4 & 5 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=164916&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]C1[/C][C]2[/C][C]3[/C][C]3[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C3[/C][C]2[/C][C]3[/C][C]3[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C5[/C][C]2[/C][C]3[/C][C]4[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C7[/C][C]2[/C][C]3[/C][C]3[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C9[/C][C]2[/C][C]3[/C][C]4[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C11[/C][C]2[/C][C]3[/C][C]4[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C13[/C][C]2[/C][C]3[/C][C]4[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C15[/C][C]2[/C][C]3[/C][C]3[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C17[/C][C]2[/C][C]3[/C][C]3[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C19[/C][C]2[/C][C]3[/C][C]3[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C21[/C][C]1[/C][C]2[/C][C]3[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C23[/C][C]2[/C][C]3[/C][C]3[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C25[/C][C]2[/C][C]3[/C][C]4[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C27[/C][C]2[/C][C]3[/C][C]4[/C][C]5[/C][C]5[/C][/ROW]
[ROW][C]C29[/C][C]2[/C][C]3[/C][C]4[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C31[/C][C]2[/C][C]3[/C][C]4[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C33[/C][C]2[/C][C]3[/C][C]3[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C35[/C][C]2[/C][C]3[/C][C]3[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C37[/C][C]2[/C][C]3[/C][C]3.5[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C39[/C][C]2[/C][C]3[/C][C]3[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C41[/C][C]2[/C][C]3[/C][C]4[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C43[/C][C]2[/C][C]3[/C][C]3[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C45[/C][C]2[/C][C]3[/C][C]4[/C][C]4[/C][C]5[/C][/ROW]
[ROW][C]C47[/C][C]2[/C][C]3[/C][C]4[/C][C]4[/C][C]5[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=164916&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=164916&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
C123345
C323345
C523445
C723345
C923445
C1123445
C1323445
C1523345
C1723345
C1923345
C2112345
C2323345
C2523445
C2723455
C2923445
C3123445
C3323345
C3523345
C37233.545
C3923345
C4123445
C4323345
C4523445
C4723445







Boxplot Notches
Variablelower boundmedianupper bound
C12.8909696416239133.10903035837609
C32.8909696416239133.10903035837609
C53.8909696416239144.10903035837609
C72.8909696416239133.10903035837609
C93.8909696416239144.10903035837609
C113.8909696416239144.10903035837609
C133.8909696416239144.10903035837609
C152.8909696416239133.10903035837609
C172.8909696416239133.10903035837609
C192.8909696416239133.10903035837609
C212.7819392832478233.21806071675218
C232.8909696416239133.10903035837609
C253.8909696416239144.10903035837609
C273.7819392832478244.21806071675218
C293.8909696416239144.10903035837609
C313.8909696416239144.10903035837609
C332.8909696416239133.10903035837609
C352.8909696416239133.10903035837609
C373.390969641623913.53.60903035837609
C392.8909696416239133.10903035837609
C413.8909696416239144.10903035837609
C432.8909696416239133.10903035837609
C453.8909696416239144.10903035837609
C473.8909696416239144.10903035837609

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
C1 & 2.89096964162391 & 3 & 3.10903035837609 \tabularnewline
C3 & 2.89096964162391 & 3 & 3.10903035837609 \tabularnewline
C5 & 3.89096964162391 & 4 & 4.10903035837609 \tabularnewline
C7 & 2.89096964162391 & 3 & 3.10903035837609 \tabularnewline
C9 & 3.89096964162391 & 4 & 4.10903035837609 \tabularnewline
C11 & 3.89096964162391 & 4 & 4.10903035837609 \tabularnewline
C13 & 3.89096964162391 & 4 & 4.10903035837609 \tabularnewline
C15 & 2.89096964162391 & 3 & 3.10903035837609 \tabularnewline
C17 & 2.89096964162391 & 3 & 3.10903035837609 \tabularnewline
C19 & 2.89096964162391 & 3 & 3.10903035837609 \tabularnewline
C21 & 2.78193928324782 & 3 & 3.21806071675218 \tabularnewline
C23 & 2.89096964162391 & 3 & 3.10903035837609 \tabularnewline
C25 & 3.89096964162391 & 4 & 4.10903035837609 \tabularnewline
C27 & 3.78193928324782 & 4 & 4.21806071675218 \tabularnewline
C29 & 3.89096964162391 & 4 & 4.10903035837609 \tabularnewline
C31 & 3.89096964162391 & 4 & 4.10903035837609 \tabularnewline
C33 & 2.89096964162391 & 3 & 3.10903035837609 \tabularnewline
C35 & 2.89096964162391 & 3 & 3.10903035837609 \tabularnewline
C37 & 3.39096964162391 & 3.5 & 3.60903035837609 \tabularnewline
C39 & 2.89096964162391 & 3 & 3.10903035837609 \tabularnewline
C41 & 3.89096964162391 & 4 & 4.10903035837609 \tabularnewline
C43 & 2.89096964162391 & 3 & 3.10903035837609 \tabularnewline
C45 & 3.89096964162391 & 4 & 4.10903035837609 \tabularnewline
C47 & 3.89096964162391 & 4 & 4.10903035837609 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=164916&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]C1[/C][C]2.89096964162391[/C][C]3[/C][C]3.10903035837609[/C][/ROW]
[ROW][C]C3[/C][C]2.89096964162391[/C][C]3[/C][C]3.10903035837609[/C][/ROW]
[ROW][C]C5[/C][C]3.89096964162391[/C][C]4[/C][C]4.10903035837609[/C][/ROW]
[ROW][C]C7[/C][C]2.89096964162391[/C][C]3[/C][C]3.10903035837609[/C][/ROW]
[ROW][C]C9[/C][C]3.89096964162391[/C][C]4[/C][C]4.10903035837609[/C][/ROW]
[ROW][C]C11[/C][C]3.89096964162391[/C][C]4[/C][C]4.10903035837609[/C][/ROW]
[ROW][C]C13[/C][C]3.89096964162391[/C][C]4[/C][C]4.10903035837609[/C][/ROW]
[ROW][C]C15[/C][C]2.89096964162391[/C][C]3[/C][C]3.10903035837609[/C][/ROW]
[ROW][C]C17[/C][C]2.89096964162391[/C][C]3[/C][C]3.10903035837609[/C][/ROW]
[ROW][C]C19[/C][C]2.89096964162391[/C][C]3[/C][C]3.10903035837609[/C][/ROW]
[ROW][C]C21[/C][C]2.78193928324782[/C][C]3[/C][C]3.21806071675218[/C][/ROW]
[ROW][C]C23[/C][C]2.89096964162391[/C][C]3[/C][C]3.10903035837609[/C][/ROW]
[ROW][C]C25[/C][C]3.89096964162391[/C][C]4[/C][C]4.10903035837609[/C][/ROW]
[ROW][C]C27[/C][C]3.78193928324782[/C][C]4[/C][C]4.21806071675218[/C][/ROW]
[ROW][C]C29[/C][C]3.89096964162391[/C][C]4[/C][C]4.10903035837609[/C][/ROW]
[ROW][C]C31[/C][C]3.89096964162391[/C][C]4[/C][C]4.10903035837609[/C][/ROW]
[ROW][C]C33[/C][C]2.89096964162391[/C][C]3[/C][C]3.10903035837609[/C][/ROW]
[ROW][C]C35[/C][C]2.89096964162391[/C][C]3[/C][C]3.10903035837609[/C][/ROW]
[ROW][C]C37[/C][C]3.39096964162391[/C][C]3.5[/C][C]3.60903035837609[/C][/ROW]
[ROW][C]C39[/C][C]2.89096964162391[/C][C]3[/C][C]3.10903035837609[/C][/ROW]
[ROW][C]C41[/C][C]3.89096964162391[/C][C]4[/C][C]4.10903035837609[/C][/ROW]
[ROW][C]C43[/C][C]2.89096964162391[/C][C]3[/C][C]3.10903035837609[/C][/ROW]
[ROW][C]C45[/C][C]3.89096964162391[/C][C]4[/C][C]4.10903035837609[/C][/ROW]
[ROW][C]C47[/C][C]3.89096964162391[/C][C]4[/C][C]4.10903035837609[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=164916&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=164916&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
C12.8909696416239133.10903035837609
C32.8909696416239133.10903035837609
C53.8909696416239144.10903035837609
C72.8909696416239133.10903035837609
C93.8909696416239144.10903035837609
C113.8909696416239144.10903035837609
C133.8909696416239144.10903035837609
C152.8909696416239133.10903035837609
C172.8909696416239133.10903035837609
C192.8909696416239133.10903035837609
C212.7819392832478233.21806071675218
C232.8909696416239133.10903035837609
C253.8909696416239144.10903035837609
C273.7819392832478244.21806071675218
C293.8909696416239144.10903035837609
C313.8909696416239144.10903035837609
C332.8909696416239133.10903035837609
C352.8909696416239133.10903035837609
C373.390969641623913.53.60903035837609
C392.8909696416239133.10903035837609
C413.8909696416239144.10903035837609
C432.8909696416239133.10903035837609
C453.8909696416239144.10903035837609
C473.8909696416239144.10903035837609



Parameters (Session):
par1 = grey ; par2 = all ; par3 = prep ; par4 = all ; par5 = COLLES actuals ;
Parameters (R input):
par1 = grey ; par2 = all ; par3 = all ; par4 = 1 ; par5 = COLLES actuals ;
R code (references can be found in the software module):
par5 <- 'COLLES actuals'
par4 <- '0'
par3 <- 'all'
par2 <- 'all'
par1 <- 'grey'
x <- as.data.frame(read.table(file='https://automated.biganalytics.eu/download/utaut.csv',sep=',',header=T))
x$U25 <- 6-x$U25
if(par2 == 'female') x <- x[x$Gender==0,]
if(par2 == 'male') x <- x[x$Gender==1,]
if(par3 == 'prep') x <- x[x$Pop==1,]
if(par3 == 'bachelor') x <- x[x$Pop==0,]
if(par4 != 'all') {
x <- x[x$Year==as.numeric(par4),]
}
cAc <- with(x,cbind( A1, A2, A3, A4, A5, A6, A7, A8, A9,A10))
cAs <- with(x,cbind(A11,A12,A13,A14,A15,A16,A17,A18,A19,A20))
cA <- cbind(cAc,cAs)
cCa <- with(x,cbind(C1,C3,C5,C7, C9,C11,C13,C15,C17,C19,C21,C23,C25,C27,C29,C31,C33,C35,C37,C39,C41,C43,C45,C47))
cCp <- with(x,cbind(C2,C4,C6,C8,C10,C12,C14,C16,C18,C20,C22,C24,C26,C28,C30,C32,C34,C36,C38,C40,C42,C44,C46,C48))
cC <- cbind(cCa,cCp)
cU <- with(x,cbind(U1,U2,U3,U4,U5,U6,U7,U8,U9,U10,U11,U12,U13,U14,U15,U16,U17,U18,U19,U20,U21,U22,U23,U24,U25,U26,U27,U28,U29,U30,U31,U32,U33))
cE <- with(x,cbind(BC,NNZFG,MRT,AFL,LPM,LPC,W,WPA))
cX <- with(x,cbind(X1,X2,X3,X4,X5,X6,X7,X8,X9,X10,X11,X12,X13,X14,X15,X16,X17,X18))
if (par5=='ATTLES connected') x <- cAc
if (par5=='ATTLES separate') x <- cAs
if (par5=='ATTLES all') x <- cA
if (par5=='COLLES actuals') x <- cCa
if (par5=='COLLES preferred') x <- cCp
if (par5=='COLLES all') x <- cC
if (par5=='CSUQ') x <- cU
if (par5=='Learning Activities') x <- cE
if (par5=='Exam Items') x <- cX
ncol <- length(x[1,])
for (jjj in 1:ncol) {
x <- x[!is.na(x[,jjj]),]
}
x <- t(x)
y <- x
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')