條形圖中陰影線的寬度

Question

我在 R 中使用以下腳本創建了一個條形圖：

bars <- c(229, 158)
shading.lines <- c(83, 83)
years <- c("1985-89", "2017")
cols1 <- c("indianred4","green4")
cols2 <- c("green4","indianred4")
barplot(bars,names.arg=years,col=cols1)
barplot(shading.lines,names.arg=NA,col=cols2,density=11,add=T)

有沒有辦法調整陰影線的寬度？ 我想讓它們更厚，以便在 1985-89 和 2017 年獲得與陰影部分相同的外觀。

Answer 1

您可以使用par(lwd=...)調整陰影的寬度：

bars <- c(229, 158)
shading.lines <- c(83, 83)
years <- c("1985-89", "2017")
cols1 <- c("indianred4","green4")
cols2 <- c("green4","indianred4")
barplot(bars,names.arg=years,col=cols1)
# Set width of shading
par(lwd=5)
barplot(shading.lines,names.arg=NA,col=cols2,density=11,add=T)
# Set width of shading to the default value
par(lwd=1)