有一种场景是,你读文章的文章的时候,发现有一段内容是
monocyte-specific genes (that is, CD14, CSF1R, TREML4)
你打算新建一个对象,叫做mono_gene,存放三个标记基因。之前我的做法有两种,一种是新建一个文本,里面存放的就是三个基因,然后用read.table
读取。第二种是mono_gene <- c("CD14","CSF1R","TREML4")
这两种方法都不够优雅,我在想能不能读取剪切板里的内容呢?我通过搜索找到了方法,read.table(file = "clipboard", sep = "\t", header=TRUE)
,但是这不够优雅,谁知道你的clipboard里到底是啥内容呢。
目前我认为能用的方法是
mono_gene <- unlist(strsplit("CD14, CSF1R, TREML4", split = ",", fixed = T))
mono_gene <- gsub(" ", "", mono_gene)
不过只能适合读取向量,如果想读取成数据库,更好的方法是利用函数textConnection
。
tmp <- "a b c d
1 1 1 B
2 1 2 C
3 1 3 C
4 1 4 C
5 1 5 B
6 1 6 B
7 1 7 C
8 1 8 A
9 1 9 B
10 1 10 C
"
df <- read.table(textConnection(object = tmp),sep="\t", header = T)
textConnection
的功能是构建一个文本输入对象, Connection, 而Connection则能被read.table等函数接受。