rinform (version 1.0.2)

black_box: Black Box

Description

Black-box time series from a collection of l sources where each series has the same number of time steps, same number of initial conditions, and possibly different bases into a single time series. The base of the resulting time series is given by the product of the bases of each time series in the collection. Black-boxing can be performed in time by providing history lengths r and future lengths through s.

Usage

black_box(series, l, r = NULL, s = NULL)

Arguments

series

Vector or Matrix of the time series to black-box.

l

Numeric giving the number of sources in the collection.

r

Vector giving the history lengths.

s

Vector giving the future lengths.

Value

Vector or Matrix giving the black-boxed time series.

Examples

# NOT RUN {
# Black-box two time series with no history or futures
xs      <- matrix(0, nrow = 8, ncol = 2)
xs[, 1] <- c(0, 1, 1, 0, 1, 0, 0, 1)
xs[, 2] <- c(1, 0, 0, 1, 1, 0, 1, 0)
black_box(xs, l = 2)                                   # c(1 2 2 1 3 0 1 2)

# Black-box two time series with histories and futures:
black_box(xs, l = 2, r = c(2, 1), s = c(0, 1))         # c(4 13 11 6 9 2)

# Black-box a single time series in time with history length 2
xs <- c(0, 1, 1, 0, 1, 0, 0, 1)
black_box(xs, l = 1, r = 2)                            # c(1 3 2 1 2 0 1)
# }