title after split.screen (was multiple plot)

par(oma=c(0,0,2,0)) and title(main='TITLE 1', outer=T)
solved my problem
i'm much obliged
kind regards soren
btw sorry for the vague subject line