R-使用尺寸重复项在列表上展开网格

问题描述

我有一个for循环,在每次迭代中,它向2个包含网络抓取数据的列表添加了另一个维度。 在第一个列表中,每个维都是一个字符数组,另一个维由数字组成,两者最多可以包含25个元素。 我想对第一个列表的重复值使用expand.grid函数,并消除第二个列表中的相应元素,以便再次使用expand.grid。

让我举个例子:

以下是4个维度(A,B,C,D)和256个元素的扩展网格:

A = c('abc',"def","ghj","klm")
B = c('amk',"amk3","nop")
C = c('kel',"amk",'sert')
D = c('zyx','xyz','amk','kel')
E=list(A,B,C,D)
F=expand.grid(E)

我也有相同的尺码表。

A3 = c('23',"34","43","32")
B3 = c('123',"231","120","150")
C3 = c('60',"70","80",'90')
D3 = c('5000','7000','9231','1234')
E3=list(A3,B3,C3,D3)
F3=expand.grid(E3)

我想要的是创建一个仅包含重复值的扩展网格,如下所示:

A2 = c("def","ghj")
B2 = c('amk',"def")
C2 = c('kel',"ghj")
D2 = c('amk','kel')
G2=list(A2,B2,C2,D2)
H2=expand.grid(G2)

但是同时,我想在由数字组成的列表上使用expand.grid。由于相同的for循环会创建两个列表,因此在expand.grid函数之前应消除的数字索引与字符列表相同。

A4 = c("34","43")
B4 = c('123',"120")
C4 = c('60',"80")
D4 = c('9231','1234')
G4=list(A4,B4,C4,D4)
H4=expand.grid(G4)

由于我无法控制尺寸,因此我想在循环后必须做些事情。但是我无法弄清楚。

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)