Parse and evaluate quosures from string

Question

Is there a way to parse and evaluate a quosure from a string. I would like to achieve the same output as in the example below:

library(rlang)
a <- 10
quo(UQ(a) + 2 * b)
## 
## ~10 + 2 * b

but starting from

t <- "UQ(a) + 2 * b"

What I tried so fare is:

# Trial 1:
quo(expr(t))

# Trial 2: 
parse_quosure(t)

# Trial 3:
quo(parse_quosure(t))

user_7128934 · Answer

One way would be to use parse to convert t to expression and eval to evaluate it.

eval(parse(text = paste0("quo(",t,")")))
#
#~10 + 2 * b