ggplot2饼图百分比未显示及标签位置异常问题求助

Hey there! Let's work through your pie chart problems step by step—these are super common hurdles when you're new to ggplot2 and data visualization, so you're in good company.

1. Why Your Percentages Aren't Showing Up #

The main issue here is that your geom_text call only uses plain category labels (the external labels vector) instead of integrating your TypeOfDelays percentage values. You aren't mapping the percentage data to the text label at all.

Plus, relying on an external vector for labels risks mismatches if your data order ever changes—always tie labels directly to your dataframe for consistency.

Fix for Missing Percentages #

First, add a column to your dataframe that combines each category label with its corresponding percentage. You can use dplyr::mutate (install the dplyr package if you haven't already) to do this cleanly, then use this new column as your text label.

2. Fixing Label Placement #

Your core logic for calculating slice midpoints (cumsum(TypeOfDelays) - TypeOfDelays/2) is correct, but you need to ensure it uses data directly from your dataframe (not external variables) to align perfectly with each slice. You can also adjust the x value to move labels closer to or further from the pie center, avoiding overlap.

Full Corrected Code #

# Load required packages
library(dplyr)
library(ggplot2)

# Create your percentage dataframe with combined label+percentage
percentageData <- data.frame(
  Year = "1987",
  TypeOfDelays = c(percDepDelays[1], percArrDelays[1], percAntDepdelays[1], percAntArrDelays[1]),
  Label = factor(c("Departure delays", "Arrival Delays", "Early Departure", "Early arrival"))
) %>%
  # Merge label and percentage with a line break for readability
  mutate(LabelWithPerc = paste0(Label, "\n", TypeOfDelays, "%"))

# Build the pie chart
ggplot(data = percentageData) +
  geom_bar(aes(x = "", y = TypeOfDelays, fill = Label), 
           stat = "identity", width = 1) +
  coord_polar(theta = "y", start = 0) +
  theme_void() +
  geom_text(aes(x = 1.2,  # Adjust this to move labels in/out of the pie
                y = cumsum(TypeOfDelays) - TypeOfDelays/2, 
                label = LabelWithPerc),
            size = 4)  # Tweak font size for better readability

Key Changes Explained #

• LabelWithPerc column: This merges category names and percentages into one string, so your labels now display both critical pieces of information.
• Dataframe-aligned labels: Using LabelWithPerc from your dataframe ensures labels always match their corresponding pie slices, no matter how your data is ordered.
• Adjusted x position: Setting x = 1.2 pushes labels slightly outside the pie, making them easier to read without overlapping slices. Try 1 or 1.3 if you want to tweak their placement further.
• Correct midpoint calculation: The y value uses percentageData's TypeOfDelays directly, so each label sits exactly in the center of its slice.

A quick side note: The ggplot2 team actually recommends bar charts over pie charts for comparing proportions—our eyes are better at judging length than area. But if a pie chart is what you need, this code should work perfectly!

内容的提问来源于stack exchange，提问作者chaw359