如何在 R 中使用带有 ggplot2 的上标？

在本文中，我们将看到如何在 R 编程语言中使用带有 ggplot2 的上标。您可以在图中的任何位置使用上标。该函数将保持不变以在所有位置使用上标值。在这里，我们将在 ggplot2 标题和轴标签处使用上标值。

为此，使用 library()函数加载第一个 ggplot2 包。

使用中的数据：

	X	Y
1	1	1
2	2	4
3	3	9
4	4	16
5	5	25
6	6	36
7	7	49
8	8	64
9	9	81
10	10	100

要创建 R 图，我们使用ggplot()函数并制作折线图，将geom_line()函数添加到 ggplot()函数。让我们首先定期绘制它，以便差异明显。

例子：

R

# Load Package
library("ggplot2")
  
# Create a DataFrame 
DF <- data.frame(X = c(1, 2, 3, 4, 5, 6, 7,
                       8, 9, 10),          
                   
                 Y = c(1, 4, 9, 16, 25, 36, 
                       49, 64, 81, 100))
  
# Create a LineGraph
ggplot(DF,aes(X, Y))+
  geom_line(size = 2, color = "green")

输出：

简单线图

上标绘图轴的标签

这里bquote()函数用于生成上标标签。

Syntax : bquote(expr)

Parameter :

• expr : language object

bquote() 对于 SuperScript ：

bquote(‘string'(math superscript Notation))

为了将标签分配给 X 和 Y 轴，我们将使用xlab()和ylab()函数分别为 X 和 Y 轴分配标签。

Syntax : xlab(“Label for X-Axis”)

Syntax : ylab(“Label for Y-Axis”)

例子：

电阻

# Load ggplot2 Package
library("ggplot2")
  
# Create a DataFrame For Plotting
DF <- data.frame(X = c(1, 2, 3, 4, 5, 6, 
                       7, 8, 9, 10),      
                   
                 Y = c(1, 4, 9, 16, 25, 36,
                       49, 64, 81, 100))
  
# Create ggplot2 Line Graph with 
# SuperScripted value of Label of 
# Y Axis.
ggplot(DF,aes(X, Y))+
  geom_line(size = 2, color = "green")+
  xlab('X-axis (number)')+
  ylab(bquote('Y-axis '(number^2)))

输出：

带有 Y 轴上标标签的 ggplot2 图

上标情节标题

要将上标添加为标题，请在 ggtitle() 中添加带有值的 bquote函数。

Syntax : ggtitle(“Title for Plot”)

Parameter :

• like xlab and ylab functions, we can give the title for plot directly using this function. Here we will bquote() function for writing Superscript value ( Number VS Number² ) as a title of plot.

Return : Title to plot.

例子：

电阻

# Load ggplot2 Package
library("ggplot2")
  
# Create a DataFrame For Plotting
DF <- data.frame(X = c(1, 2, 3, 4, 5, 6, 
                       7, 8, 9, 10),     
                   
                 Y = c(1, 4, 9, 16, 25, 36, 
                       49, 64, 81, 100))
  
# Create ggplot2 Line Graph with SuperScripted
# value of Title of plot
ggplot(DF,aes(X, Y))+
  geom_line(size = 2, color = "green")+
  ggtitle(bquote('Number VS'~Number^2))

输出：

ggplot2 带有上标标题的图