Question

因此，当我制作直方图时，x轴刻度标签默认为科学计数法（我不需要），因此我想将其更改为数据的四分位数。当我运行以下代码时，将添加新标签，但旧标签仍在下面。这是不可读的。如何删除原始标签并更换它们？

marks = c(171959, 429897, 509702, 581455, 862469)  
hist(net.worth$`Net Worth`, main="Net Worth", xlab="Net Worth", ylab="Customers", col="light blue")  
axis(1, at=marks, labels=marks)

Answer 1

您会得到重复的x轴标签，因为您将它们绘制了两次：第一次使用visit <- setRefClass("Visit", fields = list(visit="numeric", value= "numeric") ) name <- setRefClass("Name", contains="Visit", fields = list(name = "character", vis= "list") ) frame <- setRefClass("frame", contains="Name", fields = list(subject = "list")) frame$new(subject = list(c(name = "Peter", vis = list(c(visit=0, value=54), c(visit=1, value=50))), c(name = "Andi", vis = list(c(visit=0, value=48), c(visit=1, value=47)))))函数将它们与直方图一起绘制。第2次将它们添加到对hist()的调用中。

您可以通过添加axis()参数来禁止在hist中绘制原始x轴标签：

xaxt='n'

无法摆脱原始的x轴刻度标签

1 个答案: