R语言 ggplot2的上标和下标轴标签

在这篇文章中，我们将看到如何在R编程语言的ggplot2中使用上标和下标轴标签。

首先，我们应该使用library()函数加载ggplot2包。要安装和加载ggplot2包，请在R控制台上写下以下命令。

# To Install ggplot2 package 
# (Write this command to R Console)
install.packages("ggplot2")

# Load ggplot2 package
library("ggplot2")

现在，让我们来创建一个DataFrame。在这里，我们将创建一个简单的DataFrame，有两个名为X和Y的变量，然后将其分配给数据对象。让我们将其命名为 DF。 这里我们使用 rnorm() 函数为X和Y轴生成了10个随机值。

# Load Package
library("ggplot2")

# Create a DataFrame
DF <- data.frame(X = rnorm(10),                        
                 Y = rnorm(10))

为了创建一个R图，我们使用 ggplot() 函数，为了使其分散，我们在ggplot()函数中添加了 geom_point() 函数。在这里，我们使用一些参数大小、填充、颜色、形状，只是为了在ScatterPlot上更好地显示点。对于X和Y轴的标签，我们分别使用 xlab() 和 ylab() 函数。

语法

xlab("X-轴的标签")

ylab("Y轴的标签")

例子

# Load Package
library("ggplot2")
  
# Create a DataFrame 
DF <- data.frame(X = rnorm(10),                        
                 Y = rnorm(10))
  
# Create a ScatterPlot with simple labels
ggplot(DF,aes(X, Y))+
  geom_point(size = 8, fill = "green",
             color = "black", shape = 21)+
  xlab("X-Axis")+
  ylab("Y-Axis")

输出

R语言中ggplot2的上标和下标轴标签

带有简单轴标的散点图

添加上标轴标签

现在我们要把X的标签改为 “X-轴上标” **，把Y的标签改为 **”Y-轴上标 **” 。为此， **bquote() 函数被用来引用传递给它的参数。

语法： bquote(expr)

参数:

expr： 语言对象

bquote() 用于SuperScript

bquote(math superscript(^) Notation)

例子

# Load ggplot2 Package
library("ggplot2")
  
# Create a DataFrame For Plotting
DF <- data.frame(X = rnorm(10),                        
                 Y = rnorm(10))
  
# Create ggplot2 ScatterPlot with SuperScripted 
# value of Label of Axis.
ggplot(DF,aes(X, Y))+
  geom_point(size = 8, fill = "green", 
             color = "black", shape = 21)+
  xlab(bquote(X-Axis^superscript))+
  ylab(bquote(Y-Axis^superscript))

输出

R语言中ggplot2的上标和下标轴标签

带有上标轴标签的散点图

添加下标轴标签

我们将把X的标签改为 “X-轴下标 ** **” ，把Y改为 **”Y-轴下标 **” 。为此，我们将再次使用bquote()函数，但用不同的数学符号表示下标。

bquote() 用于下标。

bquote(数学下标([]) 符号)

例子

# Load ggplot2 Package
library("ggplot2")
  
# Create a DataFrame For Plotting
DF <- data.frame(X = rnorm(10),                        
                 Y = rnorm(10))
  
# Create ggplot2 ScatterPlot with SubScripted 
# value of Label of Axis.
ggplot(DF,aes(X, Y))+
  geom_point(size = 8, fill = "green",
             color = "black", shape = 21)+
  xlab(bquote(X-Axis[subscript]))+
  ylab(bquote(Y-Axis[subscript]))