---
title: "A Perfect Storm"
output: html_document
---

```{r}
options(knitr.table.format = 'markdown')
```


```{r}
df <- dplyr::frame_data(
  ~cell, ~literal_value, ~input_value, ~numeric_value,
  "B6", "$0.36", "0.36", "0.36",
  "E5", "$A$1", "=ADDRESS(1,1)", NA_character_
)
```

Just the first row.

```{r}
knitr::kable(df[1, ])
```

Just the second row.

```{r}
knitr::kable(df[2, ])
```

Both.

```{r}
knitr::kable(df)
```