R 尝试移动勾号并删除轴标题中的X

请参阅下面的代码。我为数据集创建了一个垂直方框图，然后水平翻转它。x轴和Y轴交换。我希望能够删除“X”和勾号，但我所做的一切似乎都不会改变图形的外观

#安装并加载用于打印的ggplot和ggthemes
图书馆（GG2）
图书馆（主题）
#重命名Pulse.rate.2020中的列以提供更多信息
colnames（Pulse.rate.2020）在最后一个块中执行以下操作解决了我的问题：

e<-d + theme(
  axis.ticks.length.x=unit(-0.25, "cm"), 
  axis.text.x = element_text(margin=unit(c(0.5,0.5,0.5,0.5), "cm")),
  axis.text.y = element_text(margin=unit(c(0.5,0.5,0.5,0.5), "cm")),
  axis.ticks.x = element_blank(),
  axis.title.x = element_blank(), 
  axis.ticks.length.y = unit(0, "cm")
) + labs(x="")

e它在没有
theme_tufte
的情况下工作吗？我尝试了代码（在随机数上，因为我找不到
Pulse.rate.2020
），我的绘图在左轴上没有“x”。（老实说，我也没有使用
geom_rangeframe（）
e<-d + theme(
  axis.ticks.length.x=unit(-0.25, "cm"), 
  axis.text.x = element_text(margin=unit(c(0.5,0.5,0.5,0.5), "cm")),
  axis.text.y = element_text(margin=unit(c(0.5,0.5,0.5,0.5), "cm")),
  axis.ticks.x = element_blank(),
  axis.title.x = element_blank(), 
  axis.ticks.length.y = unit(0, "cm")
) + labs(x="")