find DIANN files
Examples
td <- tempdir()
writeLines("protein", file.path(td, "database.fasta"))
writeLines("report", file.path(td, "report.tsv"))
get_files_DIANN(td)
#> $reporttsv
#> [1] "report.tsv"
#>
#> $fasta
#> [1] "database.fasta"
#>
find DIANN files
td <- tempdir()
writeLines("protein", file.path(td, "database.fasta"))
writeLines("report", file.path(td, "report.tsv"))
get_files_DIANN(td)
#> $reporttsv
#> [1] "report.tsv"
#>
#> $fasta
#> [1] "database.fasta"
#>