t1 <- "                                                                                                                Total"
t2 <- "                                          Total                                                              Stock Price"
t3 <- "                                         Dividend                              Misc Gain      MTCC Gain         Gain"
t4 <- "                         Proportion        Gain                                Position        Position       Position"
t5 <- "   Year   Dividend Gain    Earned        (1) x (2)   Dividend Gain Misc Gain    (4) - (5)       (3) - (4)     (6) + (7)"
t6 <- "  –––––        –––––        –––––          –––––         –––––       –––––        –––––          –––––          –––––"
t  <- c(t1, t2, t3, t4, t5, t6)

Proportion
   Earned
    –––––

Dividend Gain
     –––––