# DNA sequence used for the expression of human $\alpha7$ extracellular domain in *E. coli*

<!-- ```{r} -->
<!-- library(kableExtra) -->
<!--  library(dplyr) -->

<!-- footnotew <- ("Receptors were expressed in Xenopus oocytes") -->
<!-- footnotex <- ("Rn = \\textit{Rattus norvegicus} (rat), Gg = \\textit{Gallus gallus} (chicken), Dm = \\textit{Drosophila melanogaster} (fruit fly), Nl = \\textit{Nilaparvata lugens} (planthopper), Cf = \\textit{Ctenocephalides felis} (cat flea)), Lc = \\textit{Lucilia cuprina} (sheep blowfly)") -->

<!--  potencyrecombinant <- data.frame( -->
<!--    Receptor = c("Nl$\\alpha1$/Rn$\\beta2$", "Nl$\\alpha2$/Rn$\\beta2$", "Nl$\\alpha3$/Rn$\\beta2$", "Nl$\\alpha3\\alpha8$/Rn$\\beta2$", "", "", "", "Dm$\\alpha1$/Gg$\\beta2$", "", "", "", "Dm$\\alpha2$/Gg$\\beta2$", "", "", "", "Cf$\\alpha1$/Gg$\\beta2$", "", "", "", "Cf$\\alpha2$/Gg$\\beta2$", "", "", "", "Cf$\\alpha4$/Gg$\\beta2$", "", "", ""), -->
<!--    Compound = c("Imidacloprid", "Imidacloprid", "Imidaclorprid", "Imidacloprid", "Clothianidin", "Thiacloprid", "Nitenpyram", "Imidacloprid", "Clothianidin", "Acetamiprid", "Nitenpyram", "Imidacloprid", "Clothianidin", "Acetamiprid", "Nitenpyram", "Imidacloprid", "Clothianidin", "Acetamiprid", "Nitenpyram", "Imidacloprid", "Clothianidin", "Acetamiprid", "Nitenpyram", "Imidacloprid", "Clothianidin", "Acetamiprid", "Nitenpyram"), -->
<!--    EC50 = c("61", "870", "350", "3.2", "5.1", "2.8", "5.6", "0.04", "0.34", "0.23", "0.4", "0.84", "5.4", "2", "35.4", "0.02", "0.15", "0.11", "0.63", "1.31", "1.65", "2.63", "24.4", "13.8", "21.3", "9.4", "45.8"), -->
<!--    References = c("Liu et al. 2009", "", "", "Yixi et al. 2009", "", "", "", "Dederer et al. 2011", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "", "")) -->

<!--  potencyrecombinant %>% -->
<!--     mutate_all(linebreak) %>%  -->
<!--  kable("latex", align = "c", booktabs = TRUE, escape = F, -->
<!--        col.names = linebreak(c("Receptor", "Compound", "EC50\n($\\mu$M)", "Rerefence")),  -->
<!--        caption = 'The potency of neonicotinoids on recombinantly expressed insect hybrid nAChRs.') %>% -->
<!--   kable_styling(position = "center", full_width = FALSE, latex_options = "hold_position") %>% -->
<!--     add_footnote(notation = "none", c(footnotew, footnotex), -->
<!--             threeparttable = T) -->
<!-- ``` -->

(ref:appe) **Sequencing of *pelB-3C* cloned into *pET27* expression vector.** Inserted into *pET27 pelB-3C* sequence was sequenced using universal T7 forward and T7 terminator primers (a). The cloned sequence (Query) was compared to the expected sequence (Subject) (b). Single nucleotide mutation from A to C occured, highlighted in red, changing the codon from GCC to GCA, both of which encode for alanine. The cloned nucleotide sequence was translated (c) and major functional domains, as well highlighted.

\newpage

```{r out.height = '90%', fig.align='center', echo=FALSE}
knitr::include_graphics("fig/results5/png/pelb-3c_seq_1.png")
```

```{r fig.align='center', echo=FALSE}
knitr::include_graphics("fig/results5/png/pelb-3c_seq_2.png")
```

```{r pelb-3c-lbl, fig.cap = "(ref:appe)", fig.scap= "Sequencing of \\textit{pelB-3C} cloned into \\textit{pET27} expression vector", fig.align='center', echo=FALSE}
knitr::include_graphics("fig/results5/png/pelb-3c_seq_3.png")
```