FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_backtobackhist.wasp
Title produced by softwareBack to Back Histogram
Date of computationSun, 19 Oct 2008 06:27:07 -0600
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2008/Oct/19/t12244192729ct9m4k902bfr7c.htm/, Retrieved Sun, 19 May 2024 00:26:59 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=16798, Retrieved Sun, 19 May 2024 00:26:59 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact157

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
F       [Back to Back Histogram] [Q2 Back to Back H...] [2008-10-19 12:27:07] [6912578025c824de531bc660dd61b996] [Current]
-         [Back to Back Histogram] [Q2] [2008-10-20 18:41:29] [b47fceb71c9525e79a89b5fc6d023d0e]
Feedback Forum
2008-10-21 18:23:05 [Stefan Eyckmans] [reply] 
Op deze back-to-back histogram kan iets afleiden over het gemiddelde.
Het is duidelijk dat deze bij de twee grafieken verschillen. Het gaat hier ook
over twee onafhankelijke datasets. Je kan dus idd stellen dat deze niet zoveel
met elkaar te maken hebben.
2008-10-24 20:39:02 [Kenny Simons] [reply] 
Aan de hand van dit histogram kan je inderdaad afleiden dat de mediaan en het gemiddelde van de tijdreeks totale productie gelegen is rond de waarde 105, terwijl deze voor de tijdreeks productie van kleding gelegen is rond de waarde 85. Deze ligt lager, omdat de productie van kleding de laatste jaren afgezwakt is in België. We kunnen dus besluiten dat deze tijdreeksen van elkaar verschillen, maar dit verschil is nog niet significant of met andere woorden nog niet wetenschappelijk bewezen.
2008-10-26 11:10:29 [Natascha Meeus] [reply] 
Ik ben het volledig eens met de comment hierboven. De mediaan en het gemiddelde van de totale productie ligt hoger dan die van kleding. Dit is een verschil dat te zien is op het histogram, maar dit is niet bewezen.
2008-10-26 11:42:11 [Matthieu Blondeau] [reply] 
Het verschil tussen beide grafieken is niet significant. Er zullen meer berekeningen moeten gedaan worden om te kunnen besluiten dat deze grafieken niets met mekaar te maken hebben.
2008-10-26 17:21:57 [Chi-Kwong Man] [reply] 
De back-to-back histogram laat duidelijk blijken dat ze verschillend zijn.
2008-10-27 07:13:34 [Glenn De Maeyer] [reply] 
Zeer belangrijk om te weten bij een back to back histogram is dat we hier niet kunnen afleiden of er een significant verschil is in gemiddelde. We kunnen enkel visueel zien dat het verschilt, maar het is hierbij nog niet wetenschappelijk bewezen. We kunnen hier ook niet spreken van een stijgende of dalende trend aangezien we de gegevens rangschikken van klein naar groot en niet chronologisch.
2008-10-27 10:39:03 [Kim De Vos] [reply] 
De back-to-back histogram geeft duidelijk weer dat de twee datasets verschillend zijn. Een histogram vertelt ons namelijk iets meer over de verdeling van de dataset, nl. de ordening. Om dit verschil echter wetenschappelijk te kunnen aantonen dienen er meerdere berekeningen worden uitgevoerd.
Verder kunnen we bepalen waar het rekenkundig gemiddelde en de mediaan zijn gelegen op de histogram.
  2008-10-28 06:29:01 [Nilay Erdogdu] [reply] 
De histogram zegt ons inderdaad meer over de verdeling van de data. We merken op dat we gaan normaalverdeling hebben (geen symmetrie). Het gemiddelde van de kledingproductie ligt lager, de kledingproductie in BE is afgezwakt. De spreiding van beide histogrammen is even groot. Hoe meer observaties aan beide kanten, hoe groter de spreiding. De histogram van de totale productie kent een lichte scheefheid naar links.
2008-10-27 18:16:52 [Jeroen Michel] [reply] 
Het back to back histogram geeft inderdaad de ordening van de datareeks weer. Een verband anatonen hier is echter moeilijk aangezien er nog bijkomende berekeningen moeten worden gemaakt om een significant verschil aan te tonen.
2008-10-27 19:00:42 [Niels Stas] [reply] 
Afgaande op de verkregen resultaten kan je inderdaad veronderstellen dat beide reeksen weinig tot niets met elkaar te maken hebben.

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
110,40
96,40
101,90
106,20
81,00
94,70
101,00
109,40
102,30
90,70
96,20
96,10
106,00
103,10
102,00
104,70
86,00
92,10
106,90
112,60
101,70
92,00
97,40
97,00
105,40
102,70
98,10
104,50
87,40
89,90
109,80
111,70
98,60
96,90
95,10
97,00
112,70
102,90
97,40
111,40
87,40
96,80
114,10
110,30
103,90
101,60
94,60
95,90
104,70
102,80
98,10
113,90
80,90
95,70
113,20
105,90
108,80
102,30
99,00
100,70
115,50
Dataseries Y:
Download CSV
Histogram 
109,20
88,60
94,30
98,30
86,40
80,60
104,10
108,20
93,40
71,90
94,10
94,90
96,40
91,10
84,40
86,40
88,00
75,10
109,70
103,00
82,10
68,00
96,40
94,30
90,00
88,00
76,10
82,50
81,40
66,50
97,20
94,10
80,70
70,50
87,80
89,50
99,60
84,20
75,10
92,00
80,80
73,10
99,80
90,00
83,10
72,40
78,80
87,30
91,00
80,10
73,60
86,40
74,50
71,20
92,40
81,50
85,30
69,90
84,20
90,70
100,30

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135

\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' @ 72.249.127.135 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=16798&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' @ 72.249.127.135[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=16798&T=0

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

As an alternative you can also use a QR Code:  
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'Gwilym Jenkins' @ 72.249.127.135


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = grey ; par2 = grey ; par3 = TRUE ; par4 = Total Production ; par5 = Production of Clothing ;
Parameters (R input):
par1 = grey ; par2 = grey ; par3 = TRUE ; par4 = Total Production ; par5 = Production of Clothing ;
R code (references can be found in the software module):
if (par3 == 'TRUE') par3 <- TRUE
if (par3 == 'FALSE') par3 <- FALSE
library(Hmisc)
z <- data.frame(cbind(x,y))
names(z) <- list(par4,par5)
bitmap(file='plot.png')
out <- histbackback(z, probability=par3, main = main, ylab = ylab)
barplot(-out$left, col=par1, horiz=TRUE, space=0, add=TRUE, axes=FALSE)
barplot(out$right, col=par2, horiz=TRUE, space=0, add=TRUE, axes=FALSE)
dev.off()