쉼표로 R의 문자열을 연결

Question

이 같은 하나 개 .txt 파일에 몇 가지 정보가 있습니다

cars.txt 

    Ford    1000 
    Mercedes   2000 
    Lada    3000 
    Chevrolet   5000 

을하고 나는이 .txt 인 파일의 일부 요소를 읽을으로 구분되어 하나 개의 라인으로 변환 할 쉼표. 나는 다른 파일이 저장됩니다, 그래서 나는 (추가 NAME 문자열)와 같은 뭔가가 필요 : 나는 다음과 같은 코드를 시도

NAME,Mercedes,Lada 

:

conn=file("cars.txt",open="r") 
control<-readLines(conn) 
data<-strsplit(control,"\t") 
c<-1 
cars<-c() 
for (j in 1:4) 
{ 
    cars[[c]]<-data[[j]][1] 
    cd<-cd+1 
} 
carsd<-paste(cars,sep=",") 
print(carsd) 

하지만 전혀 결과, 어떤 도움 ?

감사

Answer 1

이 시도 :

control <- readLines("cars.txt") 
data <- strsplit(control, "\t") 
brands <- sapply(data, `[`, 1) 
paste(c("NAME", brands), collapse = ",")