f <- as.filename("data_expr_2014-05-01.tsv")
# new file name with inserted tags for saving normalized data
g <- insert(f, tag=c("mod", "norm"))
print(as.character(g))
# new file name with inserted extension for saving sorted data
h <- insert(f, ext="sorted")
print(as.character(h))
# new file name with different extension for saving in different format
i <- insert(f, ext="csv", replace=TRUE)
print(as.character(i))
# insert another tag
j <- insert(g, tag="qc", tag.pos=2)
print(as.character(j))
Run the code above in your browser using DataLab