Evaluation of an expression as function argument

items <- c(list(col=2),list(pch=2))

par(mfrow=c(2, 1))
for (ii in seq(2)) {
 do.call(function(x, y, ... ) plot(1:10, ...), items[ii])
}

Dear R-users,

I would like to know if is it possible to set a function argument as  
an
evaluated expression. I have tried several syntaxes, including the
following example, but could not get it anything to run. The plot
function is used here but I would like to later apply the same  
approach
to other functions.

##########################
items <- c(expression(col=2),expression(pch=2))

for (in in seq(2)) {
 plot(1:10, eval(items[i]))
}
##########################

Thanks in advance for your input.

Sebastien