r - 为现有数据表 R 的每一行创建一个新数据表，同时避免内存向量问题

Question

假设我有两个数据表:

library(data.table)
A=data.table(w=1:3,d=5:7)
B=data.table(K=2:4,m=9:11)


> A
   w d
1: 1 5
2: 2 6
3: 3 7
> B
   K  m
1: 2  9
2: 3 10
3: 4 11

我想做以下扩展，其中 A 的每一行都有一个新的 B:

C=A[,B[],by=names(A)]

   w d K  m
1: 1 5 2  9
2: 1 5 3 10
3: 1 5 4 11
4: 2 6 2  9
5: 2 6 3 10
6: 2 6 4 11
7: 3 7 2  9
8: 3 7 3 10
9: 3 7 4 11

但是，当我使用真实数据执行此操作时，我收到此错误:

Error in `[.data.table`(A, , B[], by = names(A)) : 
  negative length vectors are not allowed

事实证明这是一个内存错误。但是，我认为应该有一种方法可以在没有循环的情况下做到这一点，内存在我的服务器上高达 50GB 的 ram 上不是问题，下面的数据表肯定会小于这个值。

有人知道有效的方法吗？

Answer 1

处理此问题的一种巧妙方法可能是向每个表添加相同的辅助列，然后允许笛卡尔连接:

library(data.table)
A = data.table(w = 1:3, d = 5:7)
B = data.table(K = 2:4, m = 9:11)

A[, j := 1]
B[, j := 1]

C = A[B, on = 'j', allow.cartesian = T]