如何根据变量为ggplot2图表中的数据点填充样式？

Got it, based on your dataset and requirement to highlight points where choice is TRUE with distinct marker styles, here's a straightforward solution using ggplot2 (part of tidyverse):

Full Code Example #

library(tidyverse)

# Your dataset
df <- tribble(
  ~year, ~country, ~value, ~choice,
  2001, "France", 55, TRUE,
  2002, "France", 53, TRUE,
  2003, "France", 31, FALSE,
  2004, "France", 10, FALSE,
  2005, "France", 30, FALSE,
  2006, "France", 37, FALSE,
  2007, "France", 54, FALSE,
  2008, "France", 58, FALSE,
  2009, "France", 50, TRUE,
  2010, "France", 40, TRUE,
  2011, "France", 49, TRUE,
  2001, "USA", 55, TRUE,
  2002, "USA", 53, TRUE,
  2003, "USA", 64, FALSE,
  2004, "USA", 40, FALSE,
  2005, "USA", 30, FALSE,
  2006, "USA", 39, FALSE,
  2007, "USA", 55, FALSE,
  2008, "USA", 53, TRUE,
  2009, "USA", 71, TRUE,
  2010, "USA", 44, TRUE,
  2011, "USA", 40, TRUE
)

# Create the visualization
ggplot(df, aes(x = year, y = value, color = country)) +
  # Add line to show trend (optional but helpful for time series)
  geom_line(linewidth = 1, alpha = 0.7) +
  # Map `choice` to marker shape and fill for clear distinction
  geom_point(aes(shape = choice, fill = choice), size = 4) +
  # Customize marker shapes: FALSE = filled circle, TRUE = filled triangle
  scale_shape_manual(values = c(FALSE = 21, TRUE = 24)) +
  # Set fill colors to emphasize TRUE/FALSE status
  scale_fill_manual(values = c(FALSE = "white", TRUE = "black")) +
  # Clean, minimal theme
  theme_minimal() +
  # Add descriptive labels
  labs(
    x = "Year",
    y = "Value",
    color = "Country",
    shape = "Choice Status",
    fill = "Choice Status",
    title = "Value Trend by Country (2001-2011)",
    subtitle = "Points marked by Choice status"
  )

Key Details Explained #

• Core Mapping: We use color = country to separate the two nations' data, then add shape = choice and fill = choice to the geom_point aes to tie marker styles directly to your logical column.
• Marker Customization: Using shapes like 21 (circle) and 24 (triangle) (which support fill color) lets you create a strong visual difference between TRUE and FALSE points. You can swap these for other shapes (e.g., 22 = square, 23 = diamond) by updating the scale_shape_manual values.
• Optional Line: The geom_line adds context to show how values change over time, but you can remove it if you only want to display individual data points.
• Simpler Alternative: If you prefer a simpler marker distinction (no fill), you can map only shape:

  ggplot(df, aes(x = year, y = value, color = country)) +
    geom_point(aes(shape = choice), size = 4) +
    scale_shape_manual(values = c(FALSE = 1, TRUE = 19)) # Hollow circle vs solid circle
  

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