Come combinare do.call() plot() ed expression()

Question

Ricevo un errore quando provo a combinare utilizzando expression con do.call e plot.

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

posso ottenere la trama che voglio utilizzando solo la funzione plot:

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

Tuttavia, vorrei realizzare il mio grafico usando do.call. Ho una lunga lista di parametri memorizzati come lista, p. Tuttavia, quando provo e passo l'elenco per do.call ricevo il seguente errore:

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 

Ho provato anche la definizione della formula esplicitamente nei args passati alla do.call. vale a dire. do.call(plot,c(formula=y~x,p)). Non capisco perché sto ottenendo l'errore - soprattutto perché il seguente non dà un errore:

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

(e dà il carattere mu desiderato nella Xaxis).

Answer 1

do.call valuta i parametri prima di eseguire la funzione; provare avvolgendo l'espressione in quote:

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

Answer 2

È possibile utilizzare alist piuttosto che list

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

Answer 3

Impostazione quote=TRUE funziona anche. In effetti impedisce a do.call() di valutare gli elementi di args prima di passarli alla funzione data da 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)