Cách kết hợp do.call() plot() và expression()

Question

Tôi gặp lỗi khi thử và kết hợp sử dụng expression với do.call và plot.

x <- 1:10 
y <- x^1.5 

Tôi có thể lấy cốt truyện tôi muốn bằng cách chỉ sử dụng các chức năng plot:

plot(y~x,xlab=expression(paste("Concentration (",mu,"M)"))) 

Tuy nhiên, tôi muốn thực hiện âm mưu của tôi sử dụng do.call. Tôi có một danh sách các thông số thực sự được lưu trữ dưới dạng danh sách, p. Tuy nhiên, khi tôi cố gắng và vượt qua danh sách để do.call tôi nhận được lỗi sau:

p <- list(xlab=expression(paste("Concentration (",mu,"M)"))) 
do.call(plot,c(y~x,p)) 
Error in paste("Concentration (", mu, "M)") : 
    object 'mu' not found 

Tôi cũng đã cố gắng xác định công thức một cách rõ ràng trong args truyền cho do.call. I E. do.call(plot,c(formula=y~x,p)). Tôi không hiểu tại sao tôi gặp lỗi - đặc biệt là vì các lỗi sau không đưa ra lỗi:

do.call(plot,c(0,p)) 

(và cung cấp ký tự mu mong muốn trong xaxis).

Answer 1

do.call đánh giá các thông số trước khi chạy chức năng; hãy thử gói biểu thức trong quote:

p <- list(xlab=quote(expression(paste("Concentration (",mu,"M)")))) 
do.call("plot", c(y~x, p)) 

Answer 2

Bạn có thể sử dụng alist thay vì sau đó list

p <- alist(xlab=expression(paste("Concentration (",mu,"M)"))) 
do.call(plot,c(y~x,p)) 

Answer 3

Đặt quote=TRUE cũng hoạt động. Nó có hiệu lực ngăn chặn do.call() từ việc đánh giá các yếu tố của args trước khi nó chuyển chúng đến hàm được đưa ra bởi what.

x <- 1:10 
y <- x^1.5 
p <- list(xlab=expression(paste("Concentration (",mu,"M)",sep=""))) 

do.call(what = "plot", args = c(y ~ x, p), quote = TRUE)