powered by
Discounts a mass function.
disc(x,y)
a mass function
degree of reliability
mass function
Smets, P. (2000), Data Fusion in the Transferable Belief Model, Proceedings of the Third International Conference on Information Fusion
# NOT RUN { # 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) # }
Run the code above in your browser using DataLab