Boa tarde,

estou fazendo um gráfico com os seguintes comandos:

sp1 <- c(300, 69, 347, 42, 319, 81, 1, 100, 166, 279, 895, 334)

sp2 <- c(0, 24, 0.6, 40, 640, 0, 0, 55, 75, 139, 967, 351)

sp3 <- c(0, 0, 40, 6, 135, 238, 83, 150, 37, 107, 10)

sp4 <- c(0, 0, 1, 14, 32, 412, 139, 38, 52, 31, 45)

sp5 <-c(0, 0, 48, 0, 0, 0, 0, 41, 3, 102, 77, 0)

captura.mensal <- rbind(sp1, sp2, sp3, sp4)

colnames(captura.mensal) <- c("jan", "fev","mar", "abr", "mai", "jun", "jul", "ago", "set", "out", "nov", "dez")

par(cex.lab = 0.8, cex.axis = 0.8, "usr", cex.main = 1.2, font.main=4)

grafico.1.1 <- barplot(apply(captura.mensal, 2, sort(decreasing = TRUE), beside=TRUE, ylim = c(0,1000),

ylab = "Captura (t)", col = c("seagreen4", "red3", "purple4", "violetred", "tomato2"),

font.main = par ("font.main"), cex.axis=par("cex.axis"), cex.lab=par("cex.lab"), border=NA))

Eu preciso truncar o eixo y do gráfico.

Gostaria de saber qual função que devo usar.

Agradeço a atenção,

Aline F. Lipsky