---
title: "ImmuneSpace Report Template"
author: "An ImmuneSpace User"
date: "`r Sys.Date()`"
output: ImmuneSpaceR::template_IS
---

## Overview


## Load ImmuneSpaceR

```{r}
library(ImmuneSpaceR)
```


## Connect to the study and get datasets

```{r}
study <- CreateConnection("SDY269")

hai <- study$getDataset("hai")
elispot <- study$getDataset("elispot")
```


## Data cleaning


## Analysis

```{r}
study$plot("hai")
```
