R绘图图例下标设置问题：无法在图例中添加x₀

Got it, let's sort out how to add that x₀ subscript to your R plot legend! It's a common small hurdle, but there are simple solutions depending on whether you're using base R plotting or ggplot2. Here's what you can do:

Base R Plotting #

In base R, use expression() directly inside the legend() function to render mathematical notation like subscripts:

# Example plot
plot(1:10, 1:10, type = "l", lwd = 2, col = "blue", main = "Base R Plot with x₀ Legend")

# Add legend with subscript x₀
legend("topright", 
       legend = expression(x[0]),  # The [0] creates the subscript
       col = "blue", 
       lwd = 2)

If you need to dynamically insert a variable as the subscript (instead of hardcoding 0), use bquote():

my_subscript <- 0
plot(1:10, 1:10, type = "l", lwd = 2, col = "red")
legend("topright", 
       legend = bquote(x[.(my_subscript)]),  # .() inserts the variable value
       col = "red", 
       lwd = 2)

ggplot2 #

For ggplot2, there are two easy approaches depending on whether you're setting legend labels or the legend title:

1. Using expression() directly in scale/labs #

library(ggplot2)

# Example with legend labels
ggplot(mtcars, aes(wt, mpg, color = factor(cyl))) +
  geom_point(size = 2) +
  scale_color_discrete(
    name = "Groups",
    labels = c(expression(x[0]), "Group 2", "Group 3")  # Apply subscript to first label
  ) +
  ggtitle("ggplot2 Plot with x₀ Legend Label")

# Example with legend title
ggplot(mtcars, aes(wt, mpg, color = factor(cyl))) +
  geom_point(size = 2) +
  labs(color = expression(x[0]))  # Subscript in legend title

2. Parsing text strings with parse = TRUE #

If you prefer working with regular strings instead of expression(), you can use element_text(parse = TRUE) to tell ggplot2 to interpret the string as mathematical notation:

ggplot(mtcars, aes(wt, mpg, color = factor(cyl))) +
  geom_point(size = 2) +
  scale_color_discrete(
    name = "x[0]",  # String with subscript syntax
    labels = c("x[0]", "Group 2", "Group 3")
  ) +
  theme(
    legend.title = element_text(parse = TRUE),
    legend.text = element_text(parse = TRUE)
  ) +
  ggtitle("ggplot2 with Parsed Subscript Text")

Quick Notes #

• Use [] for subscripts and ^ for superscripts (e.g., expression(x^2) gives x²)
• bquote() is your friend when you need to mix static text with dynamic variables in mathematical notation

These methods should work for almost any scenario where you need to add subscripts (or other math notation) to your R plot legends.

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