#search
Вопрос:
# Convert from corpus to data frame
'''View(as_corpus_frame(corpus))'''
# converting into data.table
'''dt <- as.data.table(m, TRUE)'''
'''View(dt)'''
# Verifed as being data table
'''View(is.data.table(dt))'''
# Saved data table into
'''search_dt <- dt'''
'''View(is.data.table(search_dt))'''
'''View(search_dt)'''
'''View(search_res)'''
## Create a table of your search terms and the corresponding values
'''search_for <- data.table('''
'''word=c("U.S. Capital", "Biden", "Congress", "Marines", "Senate", "Santa"),'''
'''value=c(-0.5, -0.6, -0.4, -0.2, -0.4, -0.03))'''
'''search_res <- merge(search_dt[, id:=1L], search_for[, id:=1L], by="id",'''
'''allow.cartesian=TRUE)[,'''
'''match:=text %like% word, by=.(text, word, value)]['''
'''match==TRUE, .(words=paste(sort(word), collapse=", "), value=sum(value)), by=text]'''
'''search_res <- merge(search_dt[, -"id"], search_res, on="text", all.x=TRUE)'''
'''search_res'''
# **I am getting an error on on="text"**
'''View(search_res)'''
«»Ошибка, которую я получаю ниже:»»
«‘Ошибка в merge.data.table(search_dt[, -«идентификатор»], search_res, on = «корпус», : «‘
«Требуется непустой вектор имен столбцов для by «.»