更改R中特定直方图箱的颜色

时间:2016-05-07 08:00:54

标签: r histogram

我使用绘图函数创建了以下的历史记录:

hist(mst$Total[which(mst$Total<100)], axes = TRUE, ylab = "", xlab = "", main = "", col = "chartreuse4", breaks = tb, freq=TRUE, right = FALSE)

中断指定如下:

tb = c(0,1,5,10,15,20,25,30,35,40,45,50,55,60,65,70,75,80,85,90,95,100)

enter image description here

我希望能够填充不同颜色的特定历史记录箱。

颜色一: [0,1)

第二种颜色: [1,5]

三色: [5,10] [10,15]和[15,20]

第四色: 从[20,25]开始的所有箱子

如何使用r基础包图形进行此操作?

非常感谢

更新了接受的答案:

使用接受的答案,我能够创建以下情节:

range <- c(0, 1, 5, 20, 100)
col <- findInterval(tb, range, all.inside = TRUE)
col[which(col==1)] <- "firebrick1"

col[which(col==2)] <- "gold"
col[which(col==3)] <- "darkolivegreen1"
col[which(col==4)] <- "forestgreen"
hist(mst$Total[which(mst$Total<100)], axes = TRUE, ylab = "", xlab = "", main = "", col = col, breaks = tb, freq=TRUE, right = FALSE)

enter image description here

1 个答案:

答案 0 :(得分:3)

首先我们定义你的色彩间隔

Type ArrayList<com.example.FileItem> elements is not supported ..

然后安排休息

tb <- c(0,1,5,10,15,20,25,30,35,40,45,50,55,60,65,70,75,80,85,90,95,100)
range <- c(0, 1, 5, 20, 100)

然后,您可以使用col <- findInterval(tb, range, all.inside = TRUE) col [1] 1 2 3 3 3 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 4 为每个容器着色

col

不幸的是我无法测试它,因为你没有提供任何数据,但这应该可行。