r - 从 Excel 获取下标到 R

Question

我刚刚开始学习 R，但我已经遇到了第一个问题。我想在图表中显示我的数据。我的数据位于转换为 .csv 工作表的 Excel 工作表中。但我的数据中有一些化学公式，例如 Fe2O3，并且 .csv 中的所有下标都消失了。那看起来不太好。有没有办法将原始Excel文件中的下标导入到R中？ 我非常感谢您的帮助:)

编辑:我的数据包含 x 轴上显示的 6 个化学式，它们都包含下标(即 Fe2O3、ZnCl2、CO2...)和 y 轴上显示的数值。该图是条形图。我不确定是否有办法将数字更改为 R 中的下标或在导入之前保留它们。

图表如下所示。但我想将数字作为下标:

Answer 1

我不知道有没有办法将 Excel 中的格式转换为 CSV，然后转换为 R，除非您可以使用 unicode 制作这些下标。 UTF8 symbols for subscript letters

鉴于您的化学物质列表很短，调整化学名称以帮助 ggplot 用下标解释它们并不需要太多工作。如果要包含更多元素，您需要在数字两边加上括号，然后再加上波形符。然后我们还告诉 scale_x_discrete “解析”标签并将这些符号转换为格式。

set.seed(42)
chem_df <- tibble(
  Chemicals = 
    c("AgNO3", "Al2SiO5", "CO2", "Fe2O3", "FeSO4", "ZnCl2"),
  Chemicals_parsed = 
    c("AgNO[3]", "Al[2]~SiO[5]", "CO[2]", "Fe[2]~O[3]", "FeSO[4]", "ZnCl[2]"),
  Mean   = rnorm(6, 50, 30))

ggplot(chem_df, aes(x=Chemicals_parsed, Mean)) + geom_col() + 
  scale_x_discrete(name = "Chemicals",
                   labels=parse(text=chem_df$Chemicals_parsed))