2010-01-17 15 views
1

Quelqu'un a-t-il utilisé ggplot2 avec rpanel pour produire des graphiques interactifs. Voici un morceau de code que j'ai adapté de rpanel pour tracer une distribution de Poisson et avoir un curseur pour changer la valeur du paramètre.Utilisation de ggplot2 et de rpanel ensemble

Cependant, le tracé change trop lentement lorsque je modifie les paramètres à l'aide du curseur. Quand je change la fonction plot pour utiliser Lattice, c'est beaucoup plus rapide. Est-ce une limitation de ggplot2 en termes de vitesse? Y a-t-il un moyen de surmonter cela?

poisson.draw = function(panel) { 
    with(panel, { 
    x = seq(0,n, by = 1) 
    library(ggplot2) 
    y = dpois(x, lambda) 
    d = data.frame(cbind(x,y)) 
    p1 = ggplot(d, aes(x,y)) + geom_point() 
    print(p1) 
    }) 
    panel 
} 
panel <- rp.control("Poisson distribution", n = 30, lambda = 3, 
    ylim = 0.5) 
rp.slider(panel, lambda, 1, 30, poisson.draw) 
+0

Vous êtes plus susceptible d'obtenir de l'aide si vous fournissez un petit échantillon de données et du code qui illustre ce que vous avez compris jusqu'à présent. – hadley

+0

merci pour la suggestion hadley. Je vais mettre en place un petit échantillon de données et le code que j'ai jusqu'à présent. – Ramnath

Répondre

3

Malheureusement, ggplot2 est lent pour le moment. Cependant, j'ai reçu un don généreux qui me permettra de travailler sur la performance au cours de l'été, alors j'espère que ce sera considérablement amélioré.

+0

Merci pour la réponse Hadley. J'attendrai avec impatience que ggplot2 devienne plus rapide. – Ramnath