---
title: "CEAF"
output: 
	pdf_document
	word_document
---
```{r, echo=FALSE}
if(input$format=="PDF") {
    align="center"
} else {
    align="default"
}
```

## Cost-effectiveness acceptability frontier


```{r, echo=FALSE, fig.width=4.6, fig.height=4.6,fig.align=align}
if (n.ints==2) {graph="base"; pos=c(1,1)} else {graph="ggplot2"; pos=TRUE}
ceaf.plot(m.mce,graph=graph)
cat()
```

