---
title: "my-vignette"
output: rmarkdown::html_vignette
vignette: >
  %\VignetteIndexEntry{my-vignette}
  %\VignetteEngine{knitr::rmarkdown}
  %\VignetteEncoding{UTF-8}
---

```{r, include = FALSE}
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)
```

```{r setup}
library(Paralogs)
```

```{r}
library(dplyr)
# library(clusterProfiler)
library(org.Sc.sgd.db)
```

Tutorial for Paralogs

```{r}
data("lrt_yeast")
data("example_enrich_results")
```


```{r, fig.width=6, fig.height=6}
example_plot <- Paralogs::plotParalogs(
  example_enrich_results,
  lrt_yeast,
  pathway_code = "sce04138",
  # keytype = "ORF",
  juke = 18,
  title = "Example Title for this Plot"
)

example_plot

# ggplot2::ggsave("example_plot.png", example_plot, width = 7, height = 7, 
#                 dpi = 600, bg="white")
```