英文:
Plot factor levels with superscript text
问题
# 伪造数据框size <- 20df <- data.frame(grp = sample(c("A¹", "B³", "C"), size = size, replace = TRUE),value = rnorm(size, mean = 10, sd = 1)) %>%mutate(grp = as.factor(grp)) %>%group_by(grp) %>%summarise(mean = mean(value, na.rm=TRUE)) %>%ungroup()# 条形图df %>%ggplot(aes(x = grp, y = mean)) +geom_col()
英文:
Does anyone know how I can plot factor levels containing text with superscripts? In the example below I would like to have A^1 and B^3 in the x-axis as superscript text (without '^')
# Fake dataframesize <- 20df <- data.frame(grp = sample(c("A^1", "B^3", "C"), size = size, replace = TRUE),value = rnorm(size, mean = 10, sd = 1)) %>%mutate(grp = as.factor(grp)) %>%group_by(grp) %>%summarise(mean = mean(value, na.rm=TRUE)) %>%ungroup()# barplotdf %>%ggplot(aes(x = grp, y = mean)) +geom_col()
答案1
得分: 3
We can use ggtext::element_markdown
# install.packages('ggtext')df %>%ggplot(aes(x = grp, y = mean)) +geom_col() +theme(axis.text.x = ggtext::element_markdown())
英文:
We can use ggtext::element_markdown
# install.packages('ggtext')df %>%ggplot(aes(x = grp, y = mean)) +geom_col() +theme(axis.text.x = ggtext::element_markdown())
答案2
得分: 1
你可以使用expression手动指定标签：
xlabels <- c("A^1" = expression("A"^1), "B^3" = expression("B"^3), "C" = "C")# 柱状图df %>%ggplot(aes(x = grp, y = mean)) +geom_col() +scale_x_discrete(labels = xlabels)
查看这个链接：https://statisticsglobe.com/add-subscript-and-superscript-to-plot-in-r
英文:
You can use expression and specify manually your labels:
xlabels <- c("A^1" = expression("A"^1), "B^3" = expression("B"^3), "C" = "C")# barplotdf %>%ggplot(aes(x = grp, y = mean)) +geom_col() +scale_x_discrete(labels = xlabels)
Check out this link: https://statisticsglobe.com/add-subscript-and-superscript-to-plot-in-r
通过集体智慧和协作来改善编程学习和解决问题的方式。致力于成为全球开发者共同参与的知识库，让每个人都能够通过互相帮助和分享经验来进步。
评论