O que o Benilton te passou é exatamente o que você precisa, na minha humilde interpretação do problema. Quando você usa plot() de uma função, na realidade você tá fazendo um curve(), que nada mais é que unir com linhas os pontos, obtidos com x e f(x) para um grid fino de x. Então, raciocinando dessa forma e explorando o CMR do Benilton, é só fazer o mesmo: criar um vetor x com grid tão fino quanto queira.

set.seed(1)
x0 <- seq(0,2,l=100) # só criar o grid tão fino quanto queira
f1 <- function(x) x^2
f2 <- dnorm
f3 <- function(x) x^3
f4 <- cos
listaFs <- list(f1, f2, f3, f4)
results <- do.call(cbind, lapply(listaFs, function(myf, myarg) myf(myarg), x0))
matplot(x0, results, type='l')

Fique a vontade para mexer no CMR, criar/alterar as coisas e consultar o help das funções envolvidas.

À disposição.
Walmes.

==========================================================================
Walmes Marques Zeviani
LEG (Laboratório de Estatística e Geoinformação, 25.450418 S, 49.231759 W)
Departamento de Estatística - Universidade Federal do Paraná
fone: (+55) 41 3361 3573
VoIP: (3361 3600) 1053 1173
e-mail: walmes@ufpr.br
twitter: @walmeszeviani
homepage: http://www.leg.ufpr.br/~walmes
linux user number: 531218