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

[Mauro Sznelwar]

Qual a função que este comando do.call tem?


  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/8b0accce/attachment.html>