data-raw/veabfa.R

setwd("E:/R/viruses")
v <- dir(pattern=".stats.fa$")

setwd("E:/R/eukariots")
e <- dir(pattern=".stats.fa$")

setwd("E:/R/archaeas")
a <- dir(pattern=".stats.fa$")

setwd("E:/R/bacterias")
b <- dir(pattern=".stats.fa$")

veabfa <- c(v, e, a, b)
setwd("E:/R")
save(veabfa, file="veabfa.RData")
fredysiegrist/statanacoseq documentation built on May 16, 2019, 2:44 p.m.