R/bday-helper.R

#------------------------------------------------------------------------------
# Title:  bday.R - helper functions                             
# Author: Brandon Monier (brandon.monier@sdstate.edu) 
# Date:   11.20.17                                    
#------------------------------------------------------------------------------

## ASCII art storage (can I change to S4 generic?)
.ascii <- function() 
{
  art <- list(
    cake = c(
   "                                       (\n",
   "                    (\n",
   "            )                    )             (\n",
   "                    )           (o)    )\n",
   "            (      (o)    )     ,|,            )\n",
   "           (o)     ,|,          |~|    (      (o)\n",
   "           ,|,     |~|    (     | |   (o)     ,|,\n",
   "           |~|     | |   (o)    |`|   ,|,     |~|\n",
   "           |`|     |`|@@@,|,@@@@| |@@@|~|     | |\n",
   "           | | o@@@| |@@@|~|@@@@|`|@@@|`|@@@o |`|\n",
   "          o|`|@@@@@|`|@@@|`|@@@@| |@@@| |@@@@@| |o\n",
   "        o@@| |@@@@@| |@@@| |@@@@@@@@@@|`|@@@@@|`|@@o\n",
   "       @@@@|`|@@@@@@@@@@@|`|@@@@@@@@@@| |@@@@@| |@@@@\n",
   "       p@@@@@@@@@@@@@@@@@| |@@@@@@@@@@|`|@@@@@@@@@@@q\n",
   "       @@o@@@@@@@@@@@@@@@|`|@@@@@@@@@@@@@@@@@@@@@@o@@\n",
   "       @:@@@o@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@o@@::@\n",
   "       ::@@::@@o@@@@@@@@@@@@@@@@@@@@@@@@@@@@o@@:@@::@\n",
   "       ::@@::@@@@::oo@@@@oo@@@@@ooo@@@@@o:::@@@::::::\n",
   "       :::::::@::::::@@@@:::@@@:::::@@@@:::::@@::::::\n",
   "       ::::::::::::::@@::::::@:::::::@@::::::::::::::\n",
   "       :::::::::::::::@::::::::::::::@:::::::::::::::\n",
   "     .#::::::::::::::::::::::::::::::::::::::::::::::#.\n",
   "   .###::::::::::::::::::::::::::::::::::::::::::::::###.\n",
   " .#####::::::::::::::::::::::::::::::::::::::::::::::#####.\n",
   ".######`::::::::::::::::::::::::::::::::::::::::::::'######.\n",
   ".#########``::::::::::::::::::::::::::::::::::::''#########.\n",
   "`.#############```::::::::::::::::::::::::'''#############.'\n",
   " `.######################################################.'\n",
   "   ` .#################################################.'\n",
   "      ` .############################################.'\n",
   "         .#########################################.'\n",
   "                                                   \n",
   "                  Happy Birthday, %s!\n"
    )
  )  
}
btmonier/bday documentation built on May 12, 2019, 4:25 p.m.