.utilities<-function(){ " *------------------------------------------* * Utilities -- short-cut -- * *------------------------------------------* * .inClassEx # .ice * * .getData # .gd .gg * * .finCalculator # .fincal * * .mimicExce # .me .mm * * .termProjects # .tp .tt * * .showFormula # .sf .ss * *------------------------------------------* * >.ice # see a list of ice * * >.uu # back to utilities * * >.fm # back to main menu * *------------------------------------------* " .utilities_() } .utilities_<-function(){ cat( " *------------------------------------------* * Utilities -- short-cut -- * *------------------------------------------* * .inClassEx # .ice * * .getData # .gd .gg * * .finCalculator # .fincal * * .mimicExce # .me .mm * * .termProjects # .tp .tt * * .showFormula # .sf .ss * *------------------------------------------* * >.ice # see a list of ice * * >.uu # back to utilities * * >.fm # back to main menu * *------------------------------------------* " ) }