| filtering | R Documentation |
This function performs filtering inference in a Gaussian mixture dynamic Bayesian network. For a sequence of T time slices, this task consists in estimating the state of the system at each time slice t (for 1 ≤ t ≤ T) given all the data (the evidence) collected up to t. This function is also designed to perform fixed-lag smoothing inference, which consists in defining a time lag l such that at each time slice t (for l + 1 ≤ t ≤ T), the state at t - l is estimated given the evidence collected up to t (Murphy, 2002). Filtering and fixed-lag smoothing inference are performed by sequential importance resampling, which is a particle-based approximate method (Koller and Friedman, 2009).
filtering( gmdbn, evid, nodes = names(gmdbn$b_1), col_seq = NULL, lag = 0, n_part = 1000, max_part_sim = 1e+06, min_ess = 1, verbose = FALSE )
gmdbn |
An object of class |
evid |
A data frame containing the evidence. Its columns must explicitly
be named after nodes of |
nodes |
A character vector containing the inferred nodes (by default all
the nodes of |
col_seq |
A character vector containing the column names of |
lag |
A non-negative integer vector containing the time lags for which
fixed-lag smoothing inference is performed. If |
n_part |
A positive integer corresponding to the number of particles generated for each observation sequence. |
max_part_sim |
An integer greater than or equal to |
min_ess |
A numeric value in [0, 1] corresponding to the minimum ESS
(expressed as a proportion of |
verbose |
A logical value indicating whether subsets of |
If lag has one element, a data frame (tibble) with a structure
similar to evid containing the estimated values of the inferred
nodes and their observation sequences (if col_seq is not NULL).
If lag has two or more elements, a list of data frames (tibbles)
containing these values for each time lag.
Koller, D. and Friedman, N. (2009). Probabilistic Graphical Models: Principles and Techniques. The MIT Press.
Murphy, K. (2002). Dynamic Bayesian Networks: Representation, Inference and Learning. PhD thesis, University of California.
inference, prediction,
smoothing
set.seed(0)
data(gmdbn_air, data_air)
evid <- data_air
evid$NO2[sample.int(7680, 1536)] <- NA
evid$O3[sample.int(7680, 1536)] <- NA
evid$TEMP[sample.int(7680, 1536)] <- NA
evid$WIND[sample.int(7680, 1536)] <- NA
filt <- filtering(gmdbn_air, evid, col_seq = "DATE", lag = c(0, 1),
verbose = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.