Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*The author of this computation has been verified*

R Software Module

rwasp_variancereduction.wasp

Title produced by software

Variance Reduction Matrix

Date of computation

Sun, 26 Dec 2010 17:26:44 +0000

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2010/Dec/26/t1293384288v72yvegle65zcsx.htm/, Retrieved Tue, 07 May 2024 02:34:39 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=115739, Retrieved Tue, 07 May 2024 02:34:39 +0000

QR Codes:

Paste this QR Code to cite your computation.

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords

Estimated Impact

148

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)

-     [Variance Reduction Matrix] [vrm bel20] [2008-12-10 18:40:53] [74be16979710d4c4e7c6647856088456]
-  M D  [Variance Reduction Matrix] [bel 20 - VRM] [2009-12-20 20:47:32] [a18c43c8b63fa6800a53bb187b9ddd45]
-    D      [Variance Reduction Matrix] [Werkloosheid vrou...] [2010-12-26 17:26:44] [75888b09f354cf7130ae5528df429303] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	1 seconds
R Server	'Sir Ronald Aylmer Fisher' @ 193.190.124.24

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=115739&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 Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	1 seconds
R Server	'Sir Ronald Aylmer Fisher' @ 193.190.124.24

Variance Reduction Matrix
V(Y[t],d=0,D=0)	567.872748262777	Range	93.895	Trim Var.	401.924501243216
V(Y[t],d=1,D=0)	131.124657765838	Range	52.0129999999999	Trim Var.	65.5853696671074
V(Y[t],d=2,D=0)	173.241354158994	Range	61.9309999999999	Trim Var.	100.314247872131
V(Y[t],d=3,D=0)	352.684359824407	Range	91.3639999999999	Trim Var.	158.686120470056
V(Y[t],d=0,D=1)	259.175667110462	Range	57.755	Trim Var.	204.012102125544
V(Y[t],d=1,D=1)	13.4224663230489	Range	17.7659999999999	Trim Var.	8.11258359276018
V(Y[t],d=2,D=1)	22.0674736585211	Range	29.5079999999999	Trim Var.	8.23358713960778
V(Y[t],d=3,D=1)	66.0763164311682	Range	50.5179999999998	Trim Var.	26.0916999628569
V(Y[t],d=0,D=2)	457.198848297872	Range	69.7339999999999	Trim Var.	357.815840156097
V(Y[t],d=1,D=2)	34.0888175690818	Range	24.5779999999999	Trim Var.	18.4986994711538
V(Y[t],d=2,D=2)	59.2288348636355	Range	40.5839999999996	Trim Var.	24.2146559271251
V(Y[t],d=3,D=2)	177.920879596192	Range	62.0989999999996	Trim Var.	75.1394321479361

\begin{tabular}{lllllllll}
\hline
Variance Reduction Matrix \tabularnewline
V(Y[t],d=0,D=0) & 567.872748262777 & Range & 93.895 & Trim Var. & 401.924501243216 \tabularnewline
V(Y[t],d=1,D=0) & 131.124657765838 & Range & 52.0129999999999 & Trim Var. & 65.5853696671074 \tabularnewline
V(Y[t],d=2,D=0) & 173.241354158994 & Range & 61.9309999999999 & Trim Var. & 100.314247872131 \tabularnewline
V(Y[t],d=3,D=0) & 352.684359824407 & Range & 91.3639999999999 & Trim Var. & 158.686120470056 \tabularnewline
V(Y[t],d=0,D=1) & 259.175667110462 & Range & 57.755 & Trim Var. & 204.012102125544 \tabularnewline
V(Y[t],d=1,D=1) & 13.4224663230489 & Range & 17.7659999999999 & Trim Var. & 8.11258359276018 \tabularnewline
V(Y[t],d=2,D=1) & 22.0674736585211 & Range & 29.5079999999999 & Trim Var. & 8.23358713960778 \tabularnewline
V(Y[t],d=3,D=1) & 66.0763164311682 & Range & 50.5179999999998 & Trim Var. & 26.0916999628569 \tabularnewline
V(Y[t],d=0,D=2) & 457.198848297872 & Range & 69.7339999999999 & Trim Var. & 357.815840156097 \tabularnewline
V(Y[t],d=1,D=2) & 34.0888175690818 & Range & 24.5779999999999 & Trim Var. & 18.4986994711538 \tabularnewline
V(Y[t],d=2,D=2) & 59.2288348636355 & Range & 40.5839999999996 & Trim Var. & 24.2146559271251 \tabularnewline
V(Y[t],d=3,D=2) & 177.920879596192 & Range & 62.0989999999996 & Trim Var. & 75.1394321479361 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=115739&T=1

[TABLE]
[ROW][C]Variance Reduction Matrix[/C][/ROW]
[ROW][C]V(Y[t],d=0,D=0)[/C][C]567.872748262777[/C][C]Range[/C][C]93.895[/C][C]Trim Var.[/C][C]401.924501243216[/C][/ROW]
[ROW][C]V(Y[t],d=1,D=0)[/C][C]131.124657765838[/C][C]Range[/C][C]52.0129999999999[/C][C]Trim Var.[/C][C]65.5853696671074[/C][/ROW]
[ROW][C]V(Y[t],d=2,D=0)[/C][C]173.241354158994[/C][C]Range[/C][C]61.9309999999999[/C][C]Trim Var.[/C][C]100.314247872131[/C][/ROW]
[ROW][C]V(Y[t],d=3,D=0)[/C][C]352.684359824407[/C][C]Range[/C][C]91.3639999999999[/C][C]Trim Var.[/C][C]158.686120470056[/C][/ROW]
[ROW][C]V(Y[t],d=0,D=1)[/C][C]259.175667110462[/C][C]Range[/C][C]57.755[/C][C]Trim Var.[/C][C]204.012102125544[/C][/ROW]
[ROW][C]V(Y[t],d=1,D=1)[/C][C]13.4224663230489[/C][C]Range[/C][C]17.7659999999999[/C][C]Trim Var.[/C][C]8.11258359276018[/C][/ROW]
[ROW][C]V(Y[t],d=2,D=1)[/C][C]22.0674736585211[/C][C]Range[/C][C]29.5079999999999[/C][C]Trim Var.[/C][C]8.23358713960778[/C][/ROW]
[ROW][C]V(Y[t],d=3,D=1)[/C][C]66.0763164311682[/C][C]Range[/C][C]50.5179999999998[/C][C]Trim Var.[/C][C]26.0916999628569[/C][/ROW]
[ROW][C]V(Y[t],d=0,D=2)[/C][C]457.198848297872[/C][C]Range[/C][C]69.7339999999999[/C][C]Trim Var.[/C][C]357.815840156097[/C][/ROW]
[ROW][C]V(Y[t],d=1,D=2)[/C][C]34.0888175690818[/C][C]Range[/C][C]24.5779999999999[/C][C]Trim Var.[/C][C]18.4986994711538[/C][/ROW]
[ROW][C]V(Y[t],d=2,D=2)[/C][C]59.2288348636355[/C][C]Range[/C][C]40.5839999999996[/C][C]Trim Var.[/C][C]24.2146559271251[/C][/ROW]
[ROW][C]V(Y[t],d=3,D=2)[/C][C]177.920879596192[/C][C]Range[/C][C]62.0989999999996[/C][C]Trim Var.[/C][C]75.1394321479361[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=115739&T=1

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

As an alternative you can also use a QR Code:

The GUIDs for individual cells are displayed in the table below:

Variance Reduction Matrix
V(Y[t],d=0,D=0)	567.872748262777	Range	93.895	Trim Var.	401.924501243216
V(Y[t],d=1,D=0)	131.124657765838	Range	52.0129999999999	Trim Var.	65.5853696671074
V(Y[t],d=2,D=0)	173.241354158994	Range	61.9309999999999	Trim Var.	100.314247872131
V(Y[t],d=3,D=0)	352.684359824407	Range	91.3639999999999	Trim Var.	158.686120470056
V(Y[t],d=0,D=1)	259.175667110462	Range	57.755	Trim Var.	204.012102125544
V(Y[t],d=1,D=1)	13.4224663230489	Range	17.7659999999999	Trim Var.	8.11258359276018
V(Y[t],d=2,D=1)	22.0674736585211	Range	29.5079999999999	Trim Var.	8.23358713960778
V(Y[t],d=3,D=1)	66.0763164311682	Range	50.5179999999998	Trim Var.	26.0916999628569
V(Y[t],d=0,D=2)	457.198848297872	Range	69.7339999999999	Trim Var.	357.815840156097
V(Y[t],d=1,D=2)	34.0888175690818	Range	24.5779999999999	Trim Var.	18.4986994711538
V(Y[t],d=2,D=2)	59.2288348636355	Range	40.5839999999996	Trim Var.	24.2146559271251
V(Y[t],d=3,D=2)	177.920879596192	Range	62.0989999999996	Trim Var.	75.1394321479361

Parameters (Session):

par1 = 12 ;

Parameters (R input):

par1 = 12 ;

R code (references can be found in the software module):

par1 <- as.numeric(par1)
n <- length(x)
sx <- sort(x)
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Variance Reduction Matrix',6,TRUE)
a<-table.row.end(a)
for (bigd in 0:2) {
for (smalld in 0:3) {
mylabel <- 'V(Y[t],d='
mylabel <- paste(mylabel,as.character(smalld),sep='')
mylabel <- paste(mylabel,',D=',sep='')
mylabel <- paste(mylabel,as.character(bigd),sep='')
mylabel <- paste(mylabel,')',sep='')
a<-table.row.start(a)
a<-table.element(a,mylabel,header=TRUE)
myx <- x
if (smalld > 0) myx <- diff(x,lag=1,differences=smalld)
if (bigd > 0) myx <- diff(myx,lag=par1,differences=bigd)
a<-table.element(a,var(myx))
a<-table.element(a,'Range',header=TRUE)
a<-table.element(a,max(myx)-min(myx))
a<-table.element(a,'Trim Var.',header=TRUE)
smyx <- sort(myx)
sn <- length(smyx)
a<-table.element(a,var(smyx[smyx>quantile(smyx,0.05) & smyxa<-table.row.end(a)
}
}
a<-table.end(a)
table.save(a,file='mytable.tab')

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code