Adding xpd=FALSEand re-adding jobs along the horizontal axis, for example:
b <- barplot(c(363.2, 377.4), beside = TRUE,
ylim = c(340,380), col = c("orange", "blue"),xpd=FALSE)
axis(side=1,at=b,labels=c("group 1", "group 2"))
box(bty="l")
( , Googling " " , , , , ), , : , , ( , R : . ). , , , , ; .
, ", , "...