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 computationWed, 09 Dec 2015 11:38:48 +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/2015/Dec/09/t14496611666y5rev0vjgxb7cm.htm/, Retrieved Thu, 16 May 2024 07:31:31 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=285621, Retrieved Thu, 16 May 2024 07:31:31 +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] [Notched box-plot ...] [2015-12-09 11:38:48] [a05da232bd4bc389022edd498fae0565] [Current]
Feedback Forum

Post a new message
Dataseries X:
1530 4512
1297 3738
1335 4261
1282 3777
1590 4177
1300 3585
1400 3785
1255 3559
1355 3613
1375 3982
1340 3443
1380 3993
1355 3640
1522 4208
1208 3832
1405 3876
1358 3497
1292 3466
1340 3095
1400 4424
1357 3878
1287 4046
1275 3804
1270 3710
1635 4747
1505 4423
1490 4036
1485 4022
1310 3454
1420 4175
1318 3787
1432 3796
1364 4103
1405 4161
1432 4158
1207 3814
1375 3527
1350 3748
1236 3334
1250 3492
1350 3962
1320 3505
1525 4315
1570 3804
1340 3863
1422 4034
1506 4308
1215 3165
1311 3641
1300 3644
1224 3891
1350 3793
1335 4270
1390 4063
1400 4012
1225 3458
1310 3890
1560 4166
1330 3935
1222 3669
1415 3866
1175 3393
1330 4442
1485 4253
1470 3727
1135 3329
1310 3415
1154 3372
1510 4430
1415 4381
1468 4008
1390 3858
1380 4121
1432 4057
1240 3824
1195 3394
1225 3558
1188 3362
1252 3930
1315 3835
1245 3830
1430 3856
1279 3249
1245 3577
1309 3933
1412 3850
1120 3309
1220 3406
1280 3506
1440 3907
1370 4160
1192 3318
1230 3662
1346 3899
1290 3700
1165 3779
1240 3473
1132 3490
1242 3654
1270 3478
1218 3495
1430 3834
1588 3876
1320 3661
1290 3618
1260 3648
1425 4032
1226 3399
1360 3916
1620 4430
1310 3695
1250 3524
1295 3571
1290 3594
1290 3383
1275 3499
1250 3589
1270 3900
1362 4114
1300 3937
1173 3399
1256 4200
1440 4488
1180 3614
1306 4051
1350 3782
1125 3391
1165 3124
1312 4053
1300 3582
1270 3666
1335 3532
1450 4046
1310 3667
1027 2857
1235 3436
1260 3791
1165 3302
1080 3104
1127 3171
1270 3572
1252 3530
1200 3175
1290 3438
1334 3903
1380 3899
1140 3401
1243 3267
1340 3451
1168 3090
1322 3413
1249 3323
1321 3680
1192 3439
1373 3853
1170 3156
1265 3279
1235 3707
1302 4006
1241 3269
1078 3071
1520 3779
1460 3548
1075 3292
1280 3497
1180 3082
1250 3248
1190 3358
1374 3803
1306 3566
1202 3145
1240 3503
1316 3571
1280 3724
1350 3615
1180 3203
1210 3609
1127 3561
1324 3979
1210 3533
1290 3689
1100 3158
1280 4005
1175 3181
1160 3479
1205 3642
1163 3632
1022 3069
1243 3394
1350 3703
1237 3165
1204 3354
1090 3000
1355 3687
1250 3556
1076 2773
1120 3058
1220 3344
1240 3493
1220 3297
1095 3360
1235 3228
1105 3277
1405 3851
1150 3067
1305 3692
1220 3402
1296 3995
1175 3318
955 2720
1070 2937
1320 3580
1060 2939
1130 2989
1250 3586
1225 3156
1180 3246
1178 3170
1142 3268
1130 3389
1185 3381
1012 2864
1280 3740
1103 3479
1408 3647
1300 3716
1246 3284
1380 4204
1350 3735
1060 3218
1350 3685
1220 3704
1110 3214
1215 3394
1104 3233
1170 3352
1120 3391




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=285621&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'Herman Ole Andreas Wold' @ wold.wessa.net







Boxplot statistics
Variablelower whiskerlower hingemedianupper hingeupper whisker
Brain10121207128013501560
Head_size27203389361438764512

\begin{tabular}{lllllllll}
\hline
Boxplot statistics \tabularnewline
Variable & lower whisker & lower hinge & median & upper hinge & upper whisker \tabularnewline
Brain & 1012 & 1207 & 1280 & 1350 & 1560 \tabularnewline
Head_size & 2720 & 3389 & 3614 & 3876 & 4512 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=285621&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]Brain[/C][C]1012[/C][C]1207[/C][C]1280[/C][C]1350[/C][C]1560[/C][/ROW]
[ROW][C]Head_size[/C][C]2720[/C][C]3389[/C][C]3614[/C][C]3876[/C][C]4512[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=285621&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=285621&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
Brain10121207128013501560
Head_size27203389361438764512







Boxplot Notches
Variablelower boundmedianupper bound
Brain1265.3236198831812801294.67638011682
Head_size3564.0182019797936143663.98179802021

\begin{tabular}{lllllllll}
\hline
Boxplot Notches \tabularnewline
Variable & lower bound & median & upper bound \tabularnewline
Brain & 1265.32361988318 & 1280 & 1294.67638011682 \tabularnewline
Head_size & 3564.01820197979 & 3614 & 3663.98179802021 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=285621&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]Brain[/C][C]1265.32361988318[/C][C]1280[/C][C]1294.67638011682[/C][/ROW]
[ROW][C]Head_size[/C][C]3564.01820197979[/C][C]3614[/C][C]3663.98179802021[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=285621&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=285621&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
Brain1265.3236198831812801294.67638011682
Head_size3564.0182019797936143663.98179802021



Parameters (Session):
par1 = grey ;
Parameters (R input):
par1 = grey ;
R code (references can be found in the software module):
z <- na.omit(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')