将数据以文本文件的形式放在列表或名声中

Question

有一些数据（蛋白质ID），对于example:P91913 P0DM41 Q93573 P49197.I想下载http://www.uniprot.org中的序列信息，现在我可以下载一个，但我想下载许多。当我获得 .fasta 时，每个 url 仅在 ID 上不同。所以，我想把这些ID放到一个list或者frame中，然后通过ID一个一个的one.Now把这些ID放在一个文本文件中，如果想用looping语句一个一个的访问ID怎么办获取不同ID的序列信息。提前致谢！

Answer 1

x <- c("P91913", "P0DM41", "Q93573", "P49197")
y <- sapply(x, function(i) {
    url <- paste("http://www.uniprot.org/uniprot/", i, ".fasta", sep="")
    return(readLines(url))
})

writeLines(unlist(y), "E:\qq.txt")

将数据以文本文件的形式放在列表或名声中

Put the data in text file on the list or fame

r

list

frame