Obtenir foreach() et ggplot2 pour s'entendre

Question

J'ai un ensemble de données d'enquête, et je voudrais générer des graphiques d'une variable particulière, regroupés par pays du répondant. Le code que j'ai écrit pour générer les graphiques est le suivant:

countries <- isplit(drones, drones$v3) 
foreach(country = countries) %dopar% { 
    png(file = paste(output.exp, "/Histogram of Job Satisfaction in ", country$key[[1]], ".png", sep = "")) 
    country.df <- data.frame(country) #ggplot2 doesn't appreciate the lists nextElem() produces 
    ggplot(country.df, aes(x = value.v51)) + geom_histogram() 
    dev.off() 
} 

La chose vraiment bizarre? Je peux exécuter le isplit(), mettre country <- nextElem(countries), puis exécuter le code sans envoyer la ligne foreach - et obtenir un joli complot. Si j'envoie le foreach, j'obtiens des fichiers .png vierges.

Merci d'avance pour votre aide.

Je peux certainement le faire avec des boucles R standard, mais j'aimerais vraiment avoir une meilleure compréhension de foreach.

Answer 1

Vous devez print l'intrigue si vous voulez afficher:

print(ggplot(country.df, aes(x = value.v51)) + geom_histogram()) 

Par défaut, les commandes ggplot retourne un objet intrigue, mais la commande elle-même ne s'affiche pas réellement l'intrigue; cela est fait avec la commande print. Notez que lorsque vous exécutez le code de manière interactive, les résultats des commandes sont imprimés, ce qui explique pourquoi vous n'avez souvent pas besoin de l'impression explicite. Mais lors de l'emballage dans un foreach, vous devez imprimer explicitement car les résultats des commandes du corps ne seront pas répercutés.