added regionplot5.R