Print a nice banner
Print a nice banner with a border above and below the text. It centers the text, and adjusts to the width system option by breaking into multiple lines when needed.
printBanner(str, banner.width=options()$width, char.perline=.75*banner.width, border="=")
str |
character string - a title within the banner |
banner.width |
width of banner, the default is set to fit current options |
char.perline |
number of characters per line for the title, the default is 75% of the banner.width parameter |
border |
type of character for the border |
This function prints a nice banner in both R and S-PLUS
nothing is returned
options
printBanner("This is a pretty banner", banner.width=40, char.perline=30)
# the output looks like this:
# ========================================
# This is a pretty banner
# ========================================Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.