在图上的 x 轴上添加美元符号

Question

这个剧情是我做的

data(iris)
plot(density(iris$Sepal.Length), xlab = "xlab")

我知道这是荒谬的，但是有没有办法在 x 轴上的每个单位上添加一个“美元符号”？例如：

我尝试了以下方法：

library(priceR)
iris$Sepal.Length = format_dollars(iris$Sepal.Length)
plot(density(iris$Sepal.Length), xlab = "xlab")

但我认为这不是正确的做法。有没有更通用的方法来简单地向 x 轴上的每个单位添加美元符号 ($)？

谢谢

Answer 1

只需 paste 同时 axTicks(1) 和 $ 重绘 x 轴。

plot(density(iris$Sepal.Length), xlab="xlab", xaxt='n')
axis(1, axTicks(1), labels=paste0(axTicks(1), '$'))

Add dollar sign to x-axis on plot