LD: Lead an xts Object

In AndreMikulec/econModel: Meaningful Social and Economic Data from ALFRED and elsewhere

Description

This does not complain when: any(abs(k) > NROW(xTs)):
zoo_lag can not and will not handle. So k's are eliminated
beforehand.

Usage

LD(x, k = 1, ...)

Arguments

x	xts object
k	choose 1 or greater to look into the future
...	dots passed

Value

xts object

Examples

## Not run: 
# LD(lead 1) example

xts(matrix(c(1,-2,-4,8,16,32), ncol = 2), zoo::as.Date(0:2))
           [,1] [,2]
1970-01-01    1    8
1970-01-02   -2   16
1970-01-03   -4   32

LD(xts(matrix(c(1,-2,-4,8,16,32), ncol = 2), zoo::as.Date(0:2)))
           V1ld.1 V2ld.1
1970-01-01     -2     16
1970-01-02     -4     32
1970-01-03     NA     NA

# LD(lead 1 and 2) example

LD(xts(matrix(c(1,-2,-4), ncol = 1), zoo::as.Date(0:2)), k = 1:2)
           V1ld.1 V2ld.2
1970-01-01     -2     -4
1970-01-02     -4     NA
1970-01-03     NA     NA

## End(Not run)

AndreMikulec/econModel documentation built on June 30, 2021, 9:48 a.m.