condition {adoptr}

Condition a prior on an interval

Description

Restrict an object of class Prior to a sub-interval and re-normalize the PDF.

Usage

condition(dist, interval, ...)

## S4 method for signature 'PointMassPrior,numeric'
condition(dist, interval, ...)

## S4 method for signature 'ContinuousPrior,numeric'
condition(dist, interval, ...)

Arguments

dist

a univariate distribution object

interval

length-two numeric vector giving the parameter interval to condition on

...

further optional arguments

Value

conditional Prior on given interval

Examples

tmp <- condition(PointMassPrior(c(0, .5), c(.3, .7)), c(-1, .25))
expectation(tmp, identity) # 0

tmp <- condition(
    ContinuousPrior(function(x) dunif(x, .2, .4), c(.2, .4)),
    c(.3, .5)
)
bounds(tmp) # c(.3, .4)