Утверждают, что комбинация столбцов уникальна (используя `assertr`) - PullRequest
Винтажный Клуб для гитаристов
1 голос
/

Я ищу "аккуратный" и лаконичный способ убедиться, что комбинация столбцов уникальна в таблице, используя assertr.

Пока что это лучшее, что я мог придумать:

PasteRows <- function(df) {
  apply(df, 1, paste, collapse = '')
}

tib <- tibble(a = c(1, 1, 3), b = c('a', 'b', 'b'))

tib %>%
  assert_rows(PasteRows, is_uniq, a, b)

... но сначала я должен определить PasteRows. Кроме того, я не уверен, что apply имеет снижение производительности, потому что он преобразует тиббл в матрицу.

Как мне улучшить и сократить это?

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...