## Basic example
_baptiste Auguié -- `r format(Sys.time(), "%d %B, %Y")`_

```{r demo, message=FALSE, echo=FALSE}
knitr::read_demo("basic", package="cda")
knitr::read_chunk("load.R")
```
```{r load, message=FALSE, echo=FALSE}
```
```{r setup, message=FALSE, echo=FALSE}
```

In this example we define a dimer of nanorods,  model its optical response to linearly polarised light at fixed incidence, and orientation-averaged optical activity.

### Manually defining a cluster
```{r cluster, rgl=TRUE,echo=-12,tidy=FALSE,fig.width=3,fig.height=3,fig.path="basic-"}
```
# calculate extinction, absorption, scattering of linearly polarised light at fixed incidence

```{r linear,echo=TRUE,tidy=FALSE,fig.path="basic-", fig.height=4}
```

# calculate orientation-averaged optical activity

```{r oa,echo=TRUE,tidy=FALSE,fig.path="basic-",fig.width=8}
```
