Chuyển chuỗi biến facet_wrap() trong ggplot bằng R

Question

Tôi có một biến được xác định có tên là trả lời. biến này sẽ được chuyển đến facet_wrap() trong gói ggplot

response<-"job" 

Khi tôi xác định biến trực tiếp trong facet_wrap()

ví dụ

ggplot(data,aes(job,fill=class)) + geom_bar() +facet_wrap(~job) 

nó mang lại cần cốt truyện

Nhưng khi tôi chỉ định biến trả lời trong facet_wrap()

ggplot(data,aes(job,fill=reponse))+ geom_bar() + facet_wrap(~get(paste(response))) 

tôi nhận được lỗi

At least one layer must contain all variables used for facetting 

Có cách nơi facet_wrap thể chấp nhận tên biến từ biến phản ứng thay vì viết tên biến trực tiếp trong đó

Answer 1

(comment Quay @ kohske của thành một câu trả lời để nó có thể được được chấp nhận và "đã đóng"):

facet_wrap(as.formula(paste("~", response)))