Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/76.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 在多个数据集上循环读取事务_R_Affinity_Apriori_Arules - Fatal编程技术网

R 在多个数据集上循环读取事务

R 在多个数据集上循环读取事务,r,affinity,apriori,arules,R,Affinity,Apriori,Arules,我有大量文件要单独运行read.transactions()(ARULES包的一部分) 我想这样做: 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 = apr

我有大量文件要单独运行
read.transactions()
(ARULES包的一部分)

我想这样做:

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,...),...))

文件名谢谢。这正是我想要的。
transList <- lapply(filenames,read.transactions,...)
rulesList <- lapply(transList,apriori,...)