Удаление лишнего столбца в файле с разделителями табуляции - PullRequest
3 голосов
/ 23 августа 2011

Я попытался объединить разные файлы с разделителями табуляции в один файл, используя следующую команду R.

Если вы заметили, я даже сохраняю файл с помощью команды write.table.Теперь мне нужно прочитать те же файлы для дальнейшего анализа.Самая большая проблема, с которой я сталкиваюсь, заключается в том, что существует дополнительный столбец без какого-либо имени столбца, созданного автоматически. Screen shot of delim file opened in excel with Extra column(Red) Если вы заметили, что столбец (красного цвета) создается автоматически при использовании функции write.table.Я хочу избавиться от этого столбца, поскольку он затрудняет все дальнейшие вычисления. My actual output like how I need it to be saved

combine=function(file) { 
split_list <- unlist(strsplit(file,split=","))
setwd("D:/combine")
dataset <- do.call("cbind",lapply(split_list,FUN=function(files) { read.table(files,header=TRUE, sep="\t") } ) )
names(dataset)[1]=paste("Probe_ID")
drop=c("ProbeID")
dataset=dataset[,!(names(dataset)%in%drop)]
dataset$X=NULL
write.table(dataset,file="D:/output/illumina.txt",sep="\t",col.names=NA)
return ("illumina.txt") 
}

Ответы [ 2 ]

5 голосов
/ 23 августа 2011

Используйте аргумент row.names=FALSE в write.table.

2 голосов
/ 23 августа 2011

Как говорит @James - или используйте row.names=1 в read.table(), чтобы указать, что в первом столбце указаны идентификаторы строк таблицы при чтении таблицы обратно в R.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...