У меня есть два набора данных, которые я хочу объединить в блестящем приложении
Оба имеют два столбца - даты и буквенно-цифровые строки, которые выбирает пользователь
например, формат столбцов одинаков в двух кадрах данных, т.е.:
EndoNum EndoDate PathNum PathDate
F321321 13/12/2001 F321321 21/12/2001
Я хочу оставить присоединение к набору данных один с набором данных два, но даты истекают между 1-8 днями
Я пробовал с fuzzyjoin
:
EndoDate<-colnames(RV$data[as.numeric(input$endotable_columns_selected[1])])
EndoNum<-colnames(RV$data[as.numeric(input$endotable_columns_selected[2])])
PathDate<-colnames(RV2$data[as.numeric(input$endotable_columns_selected[1])])
PathNum<-colnames(RV2$data[as.numeric(input$endotable_columns_selected[2])])
difference_left_join(RV2$data,
RV$data,
by=setNames(nm=c(EndoNum,EndoDate),c(PathNum,PathDate)),
max_dist = 8,
distance_col = "Days"
)
но я получаю ошибку: Error in v1 - v2 : non-numeric argument to binary operator
Как я могу сделать соединение. Должен ли я использовать fuzzyjoin?