Как добавить динамическое имя столбца в подмножество?

Question

это часть блестящего приложения, эти значения пришли от реактивного ui/server, я сузил свою проблему на сервере.R, и я просто работаю с этой простой R, он должен правильно отражать мой вопрос. Я надеюсь, что сделать эта линия с < @> < < work ??? Я также пробовал, noquote, eval и ничего.

t <- data.frame(Titanic) 
inputparam = "Class" 
inputvalue = "2nd" 
c(inputparam, "=",inputvalue) 
noquote(inputparam) 

head(subset(t, Class ==inputvalue)) ## works OK 
head(subset(t, inputparam ==inputvalue)) ## <@>>< doesn't work !!!!! 
#temp <- quote(inputparam) 
#head(subset(t, eval(temp) == inputvalue)) 

Answer 1

eval с разбором работа

eval(parse(text=paste0("subset(t, ", inputparam, "=='", inputvalue, "')"))) 

inputvalue должен быть заключен как и с другой цитатой так, что parse распознает его как character.

В качестве альтернативы вы должны попробовать что-то вроде этого, (проверьте комментарии по причинам)

t[ t[colnames(t)==inputparam]==inputvalue, ] 

Answer 2

Получить кадр данных столбца с переменной значение с помощью двойных квадратных скобок, подмножество с использованием одиночных квадратных скобок. Это R 101:

head(t[ t[[inputparam]] ==inputvalue, ]) 

Так $ -signs получить столбцы по имени, которое является большим, и предпочтительным, если вы знаете имя заранее. Скобки в квадратных скобках оценивают содержимое в скобках и получают значение. Вы можете придерживаться любого выражения R там.