ggplot 不会删除轴刻度

Question

GGplot2 不会从我的绘图中删除轴刻度。我已经发布了下面的代码和结果图像。我曾尝试将 theme_update() 放在 theme_classic() 之前，但这似乎没有效果。我提供了以下数据。

编辑：我缩小了数据集，以便可以复制和粘贴，以便在此处重现图表

library(ggplot2)
test = read.csv("test.csv")

ggplot(test, aes(x=reorder(varnames, PercentIncMSE), 
weight=PercentIncMSE, fill=as.factor(var_categ)))+ 
  geom_bar() +
  scale_fill_discrete(name="Variable Group") +
  ylab("IncNodePurity") +
  xlab("Variable Name") +
  theme_update(axis.ticks.x = element_blank())+
  theme_classic()

CSV 数据在这里（复制和粘贴，另存为 csv 并加载）。 test.csv:

"","PercentIncMSE","varnames","var_categ"
"1",3.40165438891285,"Right Superior Temporal Gyrus S.A.","S.A."
"2",3.37949397465159,"Left Caudal Middle Frontal Gyrus S.A.","S.A."
"3",3.09930356879588,"Right Medial Temporal Lobe S.A.","S.A."
"4",3.04613121334614,"RH Mean Thickness","Thickness"
"5",2.91160219316499,"LH Mean Surface Area","S.A."
"6",2.88550323781124,"Right Medial Temporal Lobe Thickness","Thickness"
"7",2.78591569629083,"Left Precentral Gyrus S.A.","S.A."
"8",2.78561093039636,"Total Surface Area","S.A."
"9",2.65776304486951,"Right Lateral Occipital Cortex Thickness","Thickness"
"10",2.64593284649183,"Right Postcentral Gyrus Thickness","Thickness"
"11",2.62250705917071,"Right Cuneus S.A.","S.A."
"12",2.55545911837547,"Mean Thickness","Thickness"
"13",2.3676161089342,"Left Paracentral Lobule Thickness","Thickness"
"14",2.33212959759882,"Left Superior Frontal Gyrus S.A.","S.A."
"15",2.32182900208383,"Right Inferior Parietal Lobule Thickness","Thickness"
"16",2.32155274685452,"Left Posterior Cingulate Cortex S.A.","S.A."
"17",2.32132222174433,"Left Supramarginal Gyrus Thickness","Thickness"
"18",2.24006703422385,"Left Precentral Gyrus Thickness","Thickness"
"19",2.22601045517115,"Left Rostral Middle Frontal Gyrus Thickness","Thickness"
"20",2.18196099056015,"Right Superior Parietal Lobe Thickness","Thickness"

Answer 1

解决方法在这里：https://www.datanovia.com/en/blog/ggplot-axis-ticks-set-and-rotate-text-labels/#:~:text=To%20remove%20a%20particular%20axis,ticks%20%3D%20element_blank())%20.

主题应包含 axis.text.x = element_blank()

ggplot(test, aes(x=reorder(varnames, PercentIncMSE), weight=PercentIncMSE, 
fill=as.factor(var_categ)))+ 
  geom_bar() +
  scale_fill_discrete(name="Variable Group") +
  ylab("IncNodePurity") +
  xlab("Variable Name") +
  theme_classic() +
  theme_update(axis.ticks.x = element_blank(),
               axis.text.x = element_blank())

ggplot 不会删除轴刻度

ggplot won't remove axis ticks

r

data-visualization

ggplot2