## a capacity
mu <- capacity(0:15)
## normalize it
is.normalized(mu)
normalize(mu)
## a similar example with a Mobius.capacity object
a <- Mobius(mu)
is.normalized(a)
normalize(a)
zeta(normalize(a))
## a similar example with a card.capacity object
mu <- card.capacity(0:6)
is.normalized(mu)
normalize(mu)
Mobius(normalize(mu))
Run the code above in your browser using DataLab