Computes mean of a prior
distribution. (In case of orthonormal prior distributions
for factors, the mean of for the deviations from intercept
is returned.)

```
# S3 method for prior
mean(x, ...)
```

## Arguments

- x
a prior

- ...
unused

## Value

a mean of an object of class 'prior'.

## Examples

```
# create a standard normal prior distribution
p1 <- prior(distribution = "normal", parameters = list(mean = 1, sd = 1))
# compute mean of the prior distribution
mean(p1)
#> [1] 1
```