Случайно выберите строку и сохраните каждое слово в этой строке в каждой переменной Javascript

Если все элементы являются строками (черт, даже если нет, и вы можете их принуждать), то один трюк состоит в том, чтобы создать его как data.frame и использовать некоторые трюки dplyr на нем.

library(dplyr)
df <- data.frame(v1 = c("a","b","c","b"), v2 = c("b","d","e","a"))
df$key <- apply(df, 1, function(s) paste0(sort(s), collapse=''))
head(df)
##   v1 v2 key
## 1  a  b  ab
## 2  b  d  bd
## 3  c  e  ce
## 4  b  a  ab

Столбец $key должен теперь повторять повторы.

df %>% group_by(key) %>% do(head(., n = 1))
## Source: local data frame [3 x 3]
## Groups: key
##   v1 v2 key
## 1  a  b  ab
## 2  b  d  bd
## 3  c  e  ce