From 6a124ac3cecf566a0af835627677029c2935e772 Mon Sep 17 00:00:00 2001
From: Waldir Leoncio <w.l.netto@medisin.uio.no>
Date: Mon, 23 Aug 2021 06:45:51 +0200
Subject: [PATCH] Improved documentation of load_fasta (#16)

---
 R/load_fasta.R    | 3 +++
 man/load_fasta.Rd | 7 +++++++
 2 files changed, 10 insertions(+)

diff --git a/R/load_fasta.R b/R/load_fasta.R
index 53e5125..fe15345 100644
--- a/R/load_fasta.R
+++ b/R/load_fasta.R
@@ -11,6 +11,9 @@
 #' @examples
 #' msa <- system.file("extdata", "seqs.fa", package = "rhierbaps")
 #' snp.matrix <- load_fasta(msa)
+#'
+#' @author Gerry Tonkin-Hill
+#' @seealso rhierbaps::load_fasta
 #' @export
 load_fasta <- function(msa, keep.singletons=FALSE) {
 
diff --git a/man/load_fasta.Rd b/man/load_fasta.Rd
index 037c49b..bef0895 100644
--- a/man/load_fasta.Rd
+++ b/man/load_fasta.Rd
@@ -21,4 +21,11 @@ running the hierBAPS algorithm.
 \examples{
 msa <- system.file("extdata", "seqs.fa", package = "rhierbaps")
 snp.matrix <- load_fasta(msa)
+
+}
+\seealso{
+rhierbaps::load_fasta
+}
+\author{
+Gerry Tonkin-Hill
 }