extract_shift_time

extract_shift_time

extract_shift_time(object, numeric = TRUE)

Arguments

object

a lagged_scatter_result class object.

numeric

shift time as numeric or character

Value

A vector.

Author

Xiaotao Shen shenxt1990@outlook.com

Examples

data("object", package = "laggedcor")
extract_shift_time(object = object, numeric = TRUE)
#>  [1] -11 -10  -9  -8  -7  -6  -5  -4  -3  -2  -1   0   1   2   3   4   5   6   7
#> [20]   8   9  10  11
extract_shift_time(object = object, numeric = FALSE)
#>  [1] "(-11.5,-10.5]" "(-10.5,-9.5]"  "(-9.5,-8.5]"   "(-8.5,-7.5]"  
#>  [5] "(-7.5,-6.5]"   "(-6.5,-5.5]"   "(-5.5,-4.5]"   "(-4.5,-3.5]"  
#>  [9] "(-3.5,-2.5]"   "(-2.5,-1.5]"   "(-1.5,-0.5]"   "(-0.5,0.5]"   
#> [13] "(0.5,1.5]"     "(1.5,2.5]"     "(2.5,3.5]"     "(3.5,4.5]"    
#> [17] "(4.5,5.5]"     "(5.5,6.5]"     "(6.5,7.5]"     "(7.5,8.5]"    
#> [21] "(8.5,9.5]"     "(9.5,10.5]"    "(10.5,11.5]"