兩個(或更多)向量中所有元素的唯一組合在R中，我試圖從兩個不同大小的向量中創建一個所有元素的獨特組合。例如，第一個向量是> a <- c("ABC", "DEF", "GHI")第二個是當前存儲為字符串的日期。> b <- c("2012-05-01", "2012-05-02", "2012-05-03", "2012-05-04", "2012-05-05")我需要創建一個有兩列的數據框架，如下所示> data a b1 ABC 2012-05-012 ABC 2012-05-023 ABC 2012-05-034 ABC 2012-05-045 ABC 2012-05-056 DEF 2012-05-017 DEF 2012-05-028 DEF 2012-05-039 DEF 2012-05-0410 DEF 2012-05-0511 GHI 2012-05-0112 GHI 2012-05-0213 GHI 2012-05-0314 GHI 2012-05-0415 GHI 2012-05-05基本上，我在尋找一個獨特的組合，考慮一個向量的所有元素(A)與第二個向量(B)的所有元素并置。一個理想的解決方案將推廣到更多的輸入向量。另見：如何生成組合矩陣
3 回答
子衿沉夜
TA貢獻1828條經驗 獲得超3個贊
這也許是你想要的
> expand.grid(a,b)
Var1 Var2
1 ABC 2012-05-01
2 DEF 2012-05-01
3 GHI 2012-05-01
4 ABC 2012-05-02
5 DEF 2012-05-02
6 GHI 2012-05-02
7 ABC 2012-05-03
8 DEF 2012-05-03
9 GHI 2012-05-03
10 ABC 2012-05-04
11 DEF 2012-05-04
12 GHI 2012-05-04
13 ABC 2012-05-05
14 DEF 2012-05-05
15 GHI 2012-05-05
如果得到的訂單不是您想要的，那么您可以隨后進行排序。如果您將參數命名為expand.grid，它們將成為列名：
df = expand.grid(a = a, b = b)
df[order(df$a), ]
和expand.grid概括為任意數量的輸入列。
偶然的你
TA貢獻1841條經驗 獲得超3個贊
這個tidyr軟件包提供了一個不錯的選擇crossing，這比經典的要好得多。expand.grid函數，因為(1)字符串沒有轉換為因子，(2)排序更直觀：
library(tidyr)
a <- c("ABC", "DEF", "GHI")
b <- c("2012-05-01", "2012-05-02", "2012-05-03", "2012-05-04", "2012-05-05")
crossing(a, b)
# A tibble: 15 x 2
a b
<chr> <chr>
1 ABC 2012-05-01
2 ABC 2012-05-02
3 ABC 2012-05-03
4 ABC 2012-05-04
5 ABC 2012-05-05
6 DEF 2012-05-01
7 DEF 2012-05-02
8 DEF 2012-05-03
9 DEF 2012-05-04
10 DEF 2012-05-05
11 GHI 2012-05-01
12 GHI 2012-05-02
13 GHI 2012-05-03
14 GHI 2012-05-04
15 GHI 2012-05-05
小怪獸愛吃肉
TA貢獻1852條經驗 獲得超1個贊
library(data.table)CJ(a = a, b = b, unique = TRUE)
a b 1: ABC 2012-05-01 2: ABC 2012-05-02 3: ABC 2012-05-03 4: ABC 2012-05-04 5: ABC 2012-05-05 6: DEF 2012-05-01 7: DEF 2012-05-02 8: DEF 2012-05-03 9: DEF 2012-05-0410: DEF 2012-05-0511: GHI 2012-05-0112: GHI 2012-05-0213: GHI 2012-05-0314: GHI 2012-05-0415: GHI 2012-05-05
CJ(a, b, unique = TRUE)
options("datatable.CJ.names" = TRUE)
- 3 回答
- 0 關注
- 569 瀏覽
添加回答
舉報
0/150
提交
取消