[R-br] Plotar uma lista de funções em um único gráfico

[Walmes Zeviani]

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 em ufpr.br
twitter: @walmeszeviani
homepage: http://www.leg.ufpr.br/~walmes
linux user number: 531218
==========================================================================
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20111206/0922ccf5/attachment.html>