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

inputFilesPath <- system.file("extdata/", package = "sangeranalyseR")
SRfastaFFN <- file.path(inputFilesPath,
                        "fasta",
                        "SangerRead",
                        "Achl_ACHLO006-09_1_F.fa")
fastaReadFName <- "Achl_ACHLO006-09_1_F"
sangerReadFFa <- new("SangerRead",
                     inputSource        = "FASTA",
                     readFeature        = "Forward Read",
                     readFileName       = SRfastaFFN,
                     fastaReadName      = fastaReadFName,
                     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.