2013-06-04 4 views
0

read.transactions()을 별도로 실행하려는 많은 수의 파일이 있습니다 (ARULES 패키지의 일부).여러 데이터 세트에 대한 루프 read.transaction

나는 같은 것을 할 싶습니다

x_1 = read.transactions(file_1.csv,...); rules_1 = apriori(x_1,...); 

x_2 = read.transactions(file_2.csv,...); rules_2 = apriori(x_1,...); 

... 

x_N = read.transactions(file_N.csv,...); rules_1 = apriori(x_N,...); 

을 지금까지 난 그냥 코드를 복사했습니다. 분명히 루프 내에서 이렇게하는 것이 더 빠를 것 같습니다. 원본 데이터는 이미 형식이 지정되고 정렬되며 같은 위치에 있으므로 여러 디렉터리와 관련된 문제는 걱정하지 않습니다.

저는 R이 처음이에요. 그래서 이것을 어떻게 구조화할지는 모르겠습니다. 그 일을 할 수있는 또 다른 비슷한 질문 (루핑 관련)이 있다면 올바른 방향으로 향하게되어 기쁠 것입니다.

감사합니다. 액세스 할 수있는 규칙 목록을 반환합니다

filenames <- paste0("file_",1:N,".csv") 
## or maybe list.files(pattern="^file_.*.csv")) 
rulesList <- lapply(filenames, 
       function(x) apriori(read.transactions(x,...),...)) 

같은

답변

0

뭔가. 또는 :

transList <- lapply(filenames,read.transactions,...) 
rulesList <- lapply(transList,apriori,...) 
+0

감사합니다. 이것은 내가 찾고 있었던 바로 그 것이다. – user2432675