..week<<-6
.whichChapters<<-c(0:12)  # base on the following menu 
source('http://datayyy.com/fmr/starter/sourceAll.txt')

.fm<-function(){
"
 *-----------------------------------------------------*
 * Financial Modeling using R (2nd edition)  2025 Yan  *
 *-----------------------------------------------------*
 *  .c1: R Basics                                      *
 *  .c2: Value assignment/functions                    *
 *  .c3: Introduction to R packages                    *
 *  .c4: Data Frame, list, and date                    *
 *  .c5: Loops and conditions                          *
 *  .c6: Open data                                     *
 *  .c7  Data input                                    *
 *  .c8  Simple data manipulations                     *
 *  .c9  Data output                                   *
 * .c10  Simple plots and graphs                       *
 * .c11  Matrix manipulation                           *
 * .c12  Excel and R                                   *
 *-----------------------------------------------------*
 * >.c12      # go to chapter 12                       *
 * >.uu       # go to utility submenu                  *
 * >.fm       # back to this menu                      *
 *-----------------------------------------------------*
";.zfm()}

.zfm<-function(){
cat("

 *-----------------------------------------------------*
 * Financial Modeling using R (2nd edition)  2025 Yan  *
 *-----------------------------------------------------*
 *  .c1: R Basics                                      *
 *  .c2: Value assignment/functions                    *
 *  .c3: Introduction to R packages                    *
 *  .c4: Data Frame, list, and date                    *
 *  .c5: Loops and conditions                          *
 *  .c6: Open data                                     *
 *  .c7  Data input                                    *
 *  .c8  Simple data manipulations                     *
 *  .c9  Data output                                   *
 * .c10  Simple plots and graphs                       *
 * .c11  Matrix manipulation                           *
 * .c12  Excel and R                                   *
 *-----------------------------------------------------*
 * >.c12      # go to chapter 12                       *
 * >.uu       # go to utility submenu                  *
 * >.fm       # back to this menu                      *
 *-----------------------------------------------------*
")}

.cls()
.fm()