Это специфическая проблема следующей версии dev для dbplyr:
devtools :: install_github ("tidyverse / dbplyr", ref = devtools :: github_pull (72)), разработанной @ edgararuiz
Мне кажется, что функция распространения не работает должным образом ...
df_sample <- tribble(~group1, ~group2, ~group3, ~identifier, ~value,
8, 24, 6, 'mt_0',
12, 18, 24, 6, 'mt_1', 4)
con <- DBI::dbConnect(RSQLite::SQLite(), ":memory:")
df_db <- copy_to(con, df_sample, 'df_sample')
Я получил неправильный результат с помощью следующей команды.После распространения должна была быть только одна строка данных.
df_db %>% spread(identifier, value)
Результат верен, если исходные данные загружаются в локальную память.
df_db %>% collect() %>% spread(identifier, value)
У кого-нибудь есть идеи?Кроме того, я не уверен, как мне связаться с @edgarauiz.Цените это, если кто-то мог дать ему знать.Спасибо!