disc {EvCombR}

Discounting Operator

Description

Discounts a mass function.

Usage

disc(x,y)

Arguments

x

a mass function

y

degree of reliability

Value

mass function

Author(s)

Alexander Karlsson

References

Smets, P. (2000), Data Fusion in the Transferable Belief Model, Proceedings of the Third International Conference on Information Fusion

Examples

# state space
stateSpace <- c("a", "b", "c")

# mass function 
m <- mass(list("a"=0.1, "a/b/c"=0.9), stateSpace)

# source is only 80% reliable
mDisc <- disc(m, 0.8)