R n'est pas si dur! Un tutoriel, Partie 14 camemberts

par David Lillis, Ph.D.

Dans la partie 14, nous allons voir comment créer des diagrammes circulaires dans R. Créons un simple diagramme circulaire en utilisant la commande tarte (). Comme toujours, nous avons mis en place un vecteur de nombres et nous tracer le graphe.

B <- c(2, 4, 5, 7, 12, 14, 16)

Créer un graphique circulaire simple.

R n'est pas si dur! Un tutoriel, Partie 14 camemberts

Maintenant, nous allons créer un diagramme circulaire avec un titre, en utilisant des couleurs agréables, et de définir nos propres étiquettes en utilisant la palette arc-en-R de. Nous contrôlons le nombre de couleurs à l'aide de longueur (B).

B <- c(2, 4, 5, 7, 12, 14, 16)
pie (B, principale = "Mon Piechart", col = arc en ciel (longueur (B)),
étiquettes = c ( "Mon", "Mar", "mer", "Jeu", "Ven", "Sam", "Sun"))

R n'est pas si dur! Un tutoriel, Partie 14 camemberts

Voici un exemple plus complexe, en utilisant des pourcentages et une légende. Nous créons un vecteur de données, un pour chaque jour de la semaine

B <- c(5, 3, 1, 8, 9, 4, 6)

Mettre en place noir, gris et blanc pour l'impression claire.

Col. <- c("grey90","grey50","black","grey30","white","grey70","grey50")

percentlabels<- round(100*B/sum(B), 1)

Ajouter un signe « % » à chaque valeur de pourcentage à l'aide de la commande coller.

pielabels<- paste(percentlabels, "%", sep="")

Que fait la commande coller?

pie (B, principale = "Mon meilleur Piechart", col = Col., étiquettes = pielabels, CEX = 0,8)

Créer une légende à droite.

légende ( "topright", c ( "Mon", "Mar", "mer", "Jeu", "Ven", "Sam", "Soleil"), CEX = 0,8, fill = CLO)

D'ACCORD. Maintenant, nous allons créer un diagramme circulaire à partir d'une trame de données et comprennent la taille des échantillons. Tout d'abord créer une table des comptes du nombre de cylindres de l'ensemble de données de mtcars.

cyltable<- table(mtcars$cyl)
cyltable
4 6 8
11 7 14

Nous avons onze voitures avec quatre cylindres, sept voitures avec six cylindres, et quatorze voitures avec huit cylindres.

Maintenant, nous créons des étiquettes.

laboratoires<- paste("(",names(cyltable),")", "\n", cyltable, sep="")

tarte (cyltable, étiquettes = laboratoires, col = c ( "rouge", "jaune", "bleu"),
principal = « TABLEAU DE PIE DES NUMÉROS DE BOUTEILLES \ n avec la taille des échantillons »)

R n'est pas si dur! Un tutoriel, Partie 14 camemberts

Cela n'a pas été si difficile! Dans la partie 15, nous examinerons plus loin les techniques de traçage dans R.

Articles Liés