Bom dia colegas listeiros, como vão?

Nos últimos dias me vi com necessidade de elaborar gráficos do tipo BoxPlot pra poder representar a variabilidade da produção agrícola de cordo com a época de plantio.
Não tive problemas em fazer o gráfico e visualizar ele no output do R-studio. Minha dúvida é em relação ao formato com que devo salvar a figura. Gostaria de salvar os gráficos em formato de imagem e com um tamanho pré definido, pois o default de salvamento das imagens fez com que eles ocupem toda uma pagina (quando salvei em PDF).
Ao fim do email, segue parte do código que usei para gerar o BoxPlot.

Desde já, agradeço pela ajuda de todos!

a = read.table('sdesiderio.txt', header = T, sep = '\t')
media = matrix(NA, nrow = 36, ncol = 4)
colnames(media) = c('Desv.Pad', 'Media', 'M.mais', 'M.menos')

for(i in 1:36){
  d = sd(a[i,1:(ncol(a)-1)])
  media[i,1] = d
  m = rowMeans(a, na.rm = T, dims = 1)
  media[i,2] = m[i]
  media[i,3] = media[i,2]+media[i,1]
  media[i,4] = media[i,2]-media[i,1]
  ifelse(media[i,]<0, 0, media[i,])
}
a.box = t(a)
colnames(a.box) = c('J1','J2','J3','F1','F2','F3','M1','M2','M3','A1','A2','A3','M1','M2','M3',
                    'J1','J2','J3','J1','J2','J3','A1','A2','A3','S1','S2','S3','O1','O2','O3',
                    'N1','N2','N3','D1','D2','D3')
boxplot(a.box, las = 1, xlab = 'Semeadura', ylab = 'kg/ha', cex=0.5, pch=16)
title('Variação de Ya de acordo com a data de semeadura')

Yury Duarte
Engenheiro Agrônomo - ESALQ/USP