summary.transfer_entropy | R Documentation |
Prints a summary of a transfer-entropy result
## S3 method for class 'transfer_entropy' summary(object, digits = 4, probs = c(0, 0.25, 0.5, 0.75, 1), ...)
object |
a transfer_entropy |
digits |
the number of digits to display, defaults to 4 |
probs |
numeric vector of quantiles for the bootstraps |
... |
additional arguments, passed to |
invisible the object
# construct two time-series set.seed(1234567890) n <- 500 x <- rep(0, n + 1) y <- rep(0, n + 1) for (i in seq(n)) { x[i + 1] <- 0.2 * x[i] + rnorm(1, 0, 2) y[i + 1] <- x[i] + rnorm(1, 0, 2) } x <- x[-1] y <- y[-1] # Calculate Shannon's Transfer Entropy te_result <- transfer_entropy(x, y, nboot = 100) summary(te_result)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.