Wie man einen Rand um ein Barplot in R zeichnet, so wie ein Rahmen für einen Boxplot gezeichnet wird

Question

Ich versuche den gleichen Effekt zu erhalten, den Plot eines Barplot auf die gleiche Weise zu isolieren. R isoliert einen Boxplot mit einem Rand standardmäßig. Mit anderen Worten, ich mag die Grenze, die unten in dem ersten Plot erscheint in dem zweiten Plot erscheinen:

par(mfrow=c(2,1)) 

## boxplot on a formula: 
boxplot(count ~ spray, data = InsectSprays, col = "lightgray") 
# *add* notches (somewhat funny here): 
boxplot(count ~ spray, data = InsectSprays, 
     notch = TRUE, add = TRUE, col = "blue") 


require(grDevices) # for colours 
tN <- table(Ni <- stats::rpois(100, lambda=5)) 
r <- barplot(tN, col=rainbow(20)) 
#- type = "h" plotting *is* 'bar'plot 
lines(r, tN, type='h', col='red', lwd=2) 

Answer 1

Sie haben soeben box() am Ende Ihres BarPlot Code hinzu.

par(mfrow=c(2,1)) 
boxplot(count ~ spray, data = InsectSprays, col = "lightgray") 
boxplot(count ~ spray, data = InsectSprays, 
     notch = TRUE, add = TRUE, col = "blue") 
require(grDevices) # for colours 
tN <- table(Ni <- stats::rpois(100, lambda=5)) 
r <- barplot(tN, col=rainbow(20)) 
box() 
lines(r, tN, type='h', col='red', lwd=2)