blob: 3479628c78fe253f01458447b846faa9b91b1e68 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
% Generated by roxygen2 (4.1.1): do not edit by hand
% Please edit documentation in R/distrib.R
\name{lossdistrib}
\alias{lossdistrib}
\title{Loss distribution of a portfolio}
\usage{
lossdistrib(p)
}
\arguments{
\item{p}{Numeric vector, the vector of success probabilities}
}
\value{
A vector q such that q[k]=P(S=k)
}
\description{
\code{lossdistrib} computes the probability distribution of a sum
of independent Bernouilli variables with unequal probabilities.
}
\details{
This uses the basic recursive algorithm of Andersen, Sidenius and Basu
We compute the probability distribution of S = \sum_{i=1}^n X_i
where X_i is Bernouilli(p_i)
}
|