Я пытаюсь использовать следующий код:
df_rhs<- sqldf("select rhs from df_basket12 where lhs like '%", med, "%'")
здесь med аргумент функции
med_aff1<- function(med)
приходит ошибка:
Ошибка в result_create(conn@ptr, инструкция): нераспознанный токен: "'%"
Вы можете просто вставить, чтобы объединить строки.
med <- "some text"
command <- paste0("select rhs from df_basket12 where lhs like '%", med, "%'")
df_rhs<- sqldf(command)
Приложение:
Я не уверен, что должна делать ваша функция... но вывод, хранящийся в переменной med, должен быть строкой, действительной как часть оператора SQL.
Приложение 2:
Если вы хотите перебрать несколько элементов, вам нужно будет выяснить, что делать с разными выходными данными разных запросов. Поскольку вы не указали четкого направления, я сохранил их в списке.
med <- c("a", "b") #this would be your multiple element vector
results=list() #init an empty list
#loop through the vector
for (i in (med)) {
command <- paste0("select rhs from df_basket12 where lhs like '%", i, "%'")
results[i] <- sqldf(command)
}
