FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

Author's title

Author*Unverified author*
R Software Modulerwasp_rwalk.wasp
Title produced by softwareLaw of Averages
Date of computationSat, 29 Nov 2008 09:29:26 -0700
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/Nov/29/t1227976185zbmpjp33yrf56ij.htm/, Retrieved Sun, 19 May 2024 11:18:10 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=26330, Retrieved Sun, 19 May 2024 11:18:10 +0000
QR Codes:

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

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
F     [Law of Averages] [Random Walk Simul...] [2008-11-25 18:40:39] [b98453cac15ba1066b407e146608df68]
F         [Law of Averages] [s0700274] [2008-11-29 16:29:26] [c00776cbed2786c9c4960950021bd861] [Current]
Feedback Forum
2008-12-03 19:01:16 [407693b66d7f2e0b350979005057872d] [reply] 
Deze vraag is juist omdat: We gaan hier een spectraalanalyse uitvoeren. Een lage frequentie geeft een lange periode en de grafiek gaat langzaam op en neer. Op de x-as van het periodogram zien we de frequentie staan. De nadruk wordt gelegd op golfbewegingen met een lage frequentie dit duid p een reeks met een lange termijn trend. Op het cumulatief periodogram zien we een lange termijnbeweging om de trend te verklaren. Het cumulatief periodogram is stijgend dat wijst ook nog eens op de lange termijn trend
2008-12-03 19:01:21 [407693b66d7f2e0b350979005057872d] [reply] 
Deze vraag is juist omdat: We gaan hier een spectraalanalyse uitvoeren. Een lage frequentie geeft een lange periode en de grafiek gaat langzaam op en neer. Op de x-as van het periodogram zien we de frequentie staan. De nadruk wordt gelegd op golfbewegingen met een lage frequentie dit duid p een reeks met een lange termijn trend. Op het cumulatief periodogram zien we een lange termijnbeweging om de trend te verklaren. Het cumulatief periodogram is stijgend dat wijst ook nog eens op de lange termijn trend
2008-12-03 19:01:28 [407693b66d7f2e0b350979005057872d] [reply] 
Deze vraag is juist omdat: We gaan hier een spectraalanalyse uitvoeren. Een lage frequentie geeft een lange periode en de grafiek gaat langzaam op en neer. Op de x-as van het periodogram zien we de frequentie staan. De nadruk wordt gelegd op golfbewegingen met een lage frequentie dit duid p een reeks met een lange termijn trend. Op het cumulatief periodogram zien we een lange termijnbeweging om de trend te verklaren. Het cumulatief periodogram is stijgend dat wijst ook nog eens op de lange termijn trend
2008-12-04 14:21:03 [c97d2ae59c98cf77a04815c1edffab5a] [reply] 
wat de student zegt klopt, maar mijn uitleg was toch niet helemaal hetzelfde als die van de student.
algemeen kan je zeggen dat:
-hoge frequentie: korte periode, grafiek gaat snel op en neer
-lage frequentie: lange periode, grafiek gaat traag op en neer
=>spectraal analyse toepassen op random walk
=>LT-trend = golfreeks met lange periodes => lage frequentie

uitleg bij raw periodogram:
-Y-as: intensitiet waarmee golfbeweging voorkomt
=> Spectrum: duidt belangrijkheid aan van een periode
Het is duidelijk dat de lange periodes (lage frequentie) belangrijker zijn dan de korte periodes (zie spectrum)
=> je gaat de nadruk leggen op de golfbewegingen met lage frequentie, omdat die een lange periode hebben => weerspiegelen een LT-trend
-X-as: frequentie

conclusie bij cumulative periodogram:
-Cumulative periodogram = dezelfde grafiek dan de raw periodogram, maar dan alles opgeteld
-Schalen tussen 0 en 1
-Interpreteren als R-kwadraat
=>De LT-trend verklaart hier 80% van de gegevens van de tijdsreeks.(had student vermeld)
-Een stijl stijgende (zwarte) curve in het begin (links), wijst op een LT trend
=>Periodes met een lage frequentie komen het meest voor
=>Dit zijn de lange periodes => lange termijn trend
-De blauwe stippenlijnen: betrouwbaarheidsinterval
=>Nagaan of iets aan toeval is te wijten(binnen het interval) of niet.

typisch patroon van raw periodogram en cumulatief periodogram:
-dalend raw periodogram: golfbewegingen met kortere periodes(hoge frequentie) zijn minder belangrijk dan degene met lange periodes(lage frequentie)
- steil stijgend cumulatief periodogram => verwijst naar lange termijn trend.
2008-12-07 18:09:33 [Sandra Hofmans] [reply] 
Het raw periodogram geeft weer dat er overwegend lage frequenties zijn, dit duidt op een lange periode en dus lange termijn trend. Dit komt ook naar voren in het cumulatief periodogram: zoals de student reeds vermeldde, zie je een snel stijgende lijn wat wijst op een lange-termijn trend.
2008-12-08 12:52:21 [Dave Bellekens] [reply] 
We zien inderdaad zowel in het raw periodogram als in het cumulative periodogram een grafiek die duidt op een dalende lange termijn trend.

Dit wijst er op dat er een duidelijke trend aanwezig is, die we door middel van differentiatie zullen moet wegwerken (= d aanpassen).


Post a new message

Dataset

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'George Udny Yule' @ 72.249.76.132

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=26330&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'George Udny Yule' @ 72.249.76.132


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = 500 ; par2 = 0.5 ;
Parameters (R input):
par1 = 500 ; par2 = 0.5 ;
R code (references can be found in the software module):
n <- as.numeric(par1)
p <- as.numeric(par2)
heads=rbinom(n-1,1,p)
a=2*(heads)-1
b=diffinv(a,xi=0)
c=1:n
pheads=(diffinv(heads,xi=.5))/c
bitmap(file='test1.png')
op=par(mfrow=c(2,1))
plot(c,b,type='n',main='Law of Averages',xlab='Toss Number',ylab='Excess of Heads',lwd=2,cex.lab=1.5,cex.main=2)
lines(c,b,col='red')
lines(c,rep(0,n),col='black')
plot(c,pheads,type='n',xlab='Toss Number',ylab='Proportion of Heads',lwd=2,cex.lab=1.5)
lines(c,pheads,col='blue')
lines(c,rep(.5,n),col='black')
par(op)
dev.off()
b
x <- b
bitmap(file='test1.png')
r <- spectrum(x,main='Raw Periodogram')
dev.off()
r
bitmap(file='test2.png')
cpgram(x,main='Cumulative Periodogram')
dev.off()