phi <- matrix(
data = c(
-0.357, 0.771, -0.450,
0.0, -0.511, 0.729,
0, 0, -0.693
),
nrow = 3
)
colnames(phi) <- rownames(phi) <- c("x", "m", "y")
# Specific time interval ----------------------------------------------------
TotalCentral(
phi = phi,
delta_t = 1
)
# Range of time intervals ---------------------------------------------------
total_central <- TotalCentral(
phi = phi,
delta_t = 1:30
)
plot(total_central)
# Methods -------------------------------------------------------------------
# TotalCentral has a number of methods including
# print, summary, and plot
total_central <- TotalCentral(
phi = phi,
delta_t = 1:5
)
print(total_central)
summary(total_central)
plot(total_central)
Run the code above in your browser using DataLab