tests/testthat/helper-SangerRead-FASTA-reverse.R

inputFilesPath <- system.file("extdata/", package = "sangeranalyseR")
SRfastaRFN <- file.path(inputFilesPath,
                        "fasta",
                        "SangerRead",
                        "Achl_ACHLO006-09_2_R.fa")
fastaReadRName <- "Achl_ACHLO006-09_2_R"
sangerReadRFa <- new("SangerRead",
                     inputSource        = "FASTA",
                     readFeature        = "Reverse Read",
                     readFileName       = SRfastaRFN,
                     fastaReadName      = fastaReadRName,
                     geneticCode        = GENETIC_CODE)

Try the sangeranalyseR package in your browser

Any scripts or data that you put into this service are public.

sangeranalyseR documentation built on Nov. 8, 2020, 5:59 p.m.