Learn R Programming

covatest (version 1.0.1)

couples-class: Class "couples"

Description

A class for spatial points and the corresponding temporal lags to be analyzed in order to test some covariance properties and some well known classes of space-time covariance functions models

Usage

couples(sel.staz, sp.couples.in, t.couples.in, typetest = "sym",
  typecode = numeric())

# S4 method for couples show(object)

# S4 method for couples [(x, i, by.row = FALSE)

# S4 method for couples summary(object)

Arguments

sel.staz

vector; the sequence of ID codes which denote the spatial points to be analyzed

sp.couples.in

two-column matrix: rows corresponding to the couples of different spatial points, chosen among the ones fixed in sel.staz argument, to be compared

t.couples.in

vector of only positive (negative) temporal lags to be analyzed. The corresponding negative (positive) temporal lags are included authomatically for typetest = "sym","sep","tnSep". If some temporal lags, corresponding to some couples of spatial points, are not required for the specific test, they can be set equal to zero, through the specific setzero method

typetest

character; set typetest = "sym" for symmetry test (default choice), typetest = "sep" for separability test, typetest = "tnSep" for type of non separability test,typetest = "productSum" for the test on the product-sum class of models, typetest = "intProduct" for the test on the integrated product class of models, typetest = "gneiting" for the test on the Gneiting class of models

typecode

numeric or character; specifies the codification of the spatial points in the data frame or in the STFDF/STSDF

object

object of class couples for methods show and summary

x

object of class couples for method extract

i

selection of rows or columns of the slot @couples.st. Rows or columns depending on the logical parameter by.row to be set

by.row

logical; if TRUE rows of the slot @couples.st are selected (the temporal lags associated to the i-th spatial couple are given). If FALSE (the default) columns of the slot @couples.st are selected. In particular, the spatial couples associated to the i-th temporal lag (i >= 3, temporal lags are stored from the third column) are given

Slots

couples.st

matrix; in which the first two columns contain the couples of spatial points (denoted with order numbers) to be analyzed and the other columns the temporal lags associated with each spatial couples

sel.staz

numeric or character; contains the ID codes of the selected spatial points

sp.couples

data.frame; contains the couples of order numbers associated with the spatial points to be analyzed and the couples of the ID codes

tl.couples

numeric; contains the temporal lags associated to the couples of the selected spatial points

typetest

character; contains the code of the test to be performed

See Also

setzero

Examples

Run this code
# NOT RUN {
sel.staz.sym <- c("DERP016", "DENW065", "DEHE051", "DETH026", "DENW063", "DENI019",
"DENW068", "DEHE046", "DEUB029", "DEBY047", "DETH061", "DESN049")

sp.couples.in.sym <- matrix(data = c("DERP016", "DENW065", "DEHE051", "DETH026",
"DENW063", "DENI019", "DENW068", "DEHE046", "DEUB029", "DEBY047", "DETH061", "DESN049"),
ncol = 2, byrow = TRUE)

t.couples.in.sym <- c(1, 2)

couples.sym <- couples(sel.staz = sel.staz.sym, sp.couples.in = sp.couples.in.sym,
t.couples.in = t.couples.in.sym, typetest = "sym", typecode = character())

###methods for couples
#1. show
couples.sym

#2. [ extract
couples.sym[3, by.row = FALSE]
couples.sym[3, by.row = TRUE]

#3. summary
summary(couples.sym)

# }

Run the code above in your browser using DataLab