progs/drumb_sol.scala
changeset 140 ecec79b9ab25
parent 131 1fb90f5d53ee
equal deleted inserted replaced
139:3350cc06804b 140:ecec79b9ab25
     7 //two test portfolios
     7 //two test portfolios
     8 
     8 
     9 val blchip_portfolio = List("GOOG", "AAPL", "MSFT", "IBM", "FB", "AMZN", "BIDU")
     9 val blchip_portfolio = List("GOOG", "AAPL", "MSFT", "IBM", "FB", "AMZN", "BIDU")
    10 val rstate_portfolio = List("PLD", "PSA", "AMT", "AIV", "AVB", "BXP", "CCI", 
    10 val rstate_portfolio = List("PLD", "PSA", "AMT", "AIV", "AVB", "BXP", "CCI", 
    11                             "DLR", "EQIX", "EQR", "ESS", "EXR", "FRT", "GGP", "HCP") 
    11                             "DLR", "EQIX", "EQR", "ESS", "EXR", "FRT", "GGP", "HCP") 
    12 
       
    13 // (1) The function below should obtain the first trading price
       
    14 // for a stock symbol by using the query
       
    15 //
       
    16 //    http://ichart.yahoo.com/table.csv?s=<<symbol>>&a=0&b=1&c=<<year>>&d=1&e=1&f=<<year>> 
       
    17 // 
       
    18 // and extracting the first January Adjusted Close price in a year.
       
    19 
       
    20 
    12 
    21 import io.Source
    13 import io.Source
    22 import scala.util._
    14 import scala.util._
    23 
    15 
    24 def get_january_data(symbol: String, year: Int) : List[String] = 
    16 def get_january_data(symbol: String, year: Int) : List[String] = 
    33 get_first_price("GOOG", 1980)
    25 get_first_price("GOOG", 1980)
    34 get_first_price("GOOG", 2010)
    26 get_first_price("GOOG", 2010)
    35 get_first_price("FB", 2014)
    27 get_first_price("FB", 2014)
    36 
    28 
    37 
    29 
    38 // Complete the function below that obtains all first prices
       
    39 // for the stock symbols from a portfolio for the given
       
    40 // range of years
       
    41 
       
    42 def get_prices(portfolio: List[String], years: Range): List[List[Option[Double]]] = 
    30 def get_prices(portfolio: List[String], years: Range): List[List[Option[Double]]] = 
    43   for (year <- years.toList) yield
    31   for (year <- years.toList) yield
    44     for (symbol <- portfolio) yield get_first_price(symbol, year)
    32     for (symbol <- portfolio) yield get_first_price(symbol, year)
    45 
    33 
    46 
    34 
    48 val p_fb = get_prices(List("FB"), 2012 to 2014)
    36 val p_fb = get_prices(List("FB"), 2012 to 2014)
    49 val p = get_prices(List("GOOG", "AAPL"), 2010 to 2012)
    37 val p = get_prices(List("GOOG", "AAPL"), 2010 to 2012)
    50 
    38 
    51 val tt = get_prices(List("BIDU"), 2004 to 2008)
    39 val tt = get_prices(List("BIDU"), 2004 to 2008)
    52 
    40 
    53 // (2) The first function below calculates the change factor (delta) between
       
    54 // a price in year n and a price in year n+1. The second function calculates
       
    55 // all change factors for all prices (from a portfolio).
       
    56 
    41 
    57 def get_delta(price_old: Option[Double], price_new: Option[Double]) : Option[Double] = {
    42 def get_delta(price_old: Option[Double], price_new: Option[Double]) : Option[Double] = {
    58   (price_old, price_new) match {
    43   (price_old, price_new) match {
    59     case (Some(x), Some(y)) => Some((y - x) / x)
    44     case (Some(x), Some(y)) => Some((y - x) / x)
    60     case _ => None
    45     case _ => None
    67 
    52 
    68 
    53 
    69 // test case using the prices calculated above
    54 // test case using the prices calculated above
    70 val d = get_deltas(p)
    55 val d = get_deltas(p)
    71 val ttd = get_deltas(tt)
    56 val ttd = get_deltas(tt)
    72 
       
    73 // (3) Write a function that given change factors, a starting balance and a year
       
    74 // calculates the yearly yield, i.e. new balanace, according to our dump investment 
       
    75 // strategy. Another function calculates given the same data calculates the
       
    76 // compound yield up to a given year. Finally a function combines all 
       
    77 // calculations by taking a portfolio, a range of years and a start balance
       
    78 // as arguments.
       
    79 
    57 
    80 
    58 
    81 def yearly_yield(data: List[List[Option[Double]]], balance: Long, year: Int): Long = {
    59 def yearly_yield(data: List[List[Option[Double]]], balance: Long, year: Int): Long = {
    82   val somes = data(year).flatten
    60   val somes = data(year).flatten
    83   val somes_length = somes.length
    61   val somes_length = somes.length
    93     val new_balance = yearly_yield(data, balance, year)
    71     val new_balance = yearly_yield(data, balance, year)
    94     compound_yield(data, new_balance, year + 1)
    72     compound_yield(data, new_balance, year + 1)
    95   }
    73   }
    96 }
    74 }
    97 
    75 
    98 yearly_yield(d, 100, 0)
       
    99 //compound_yield(d.take(6), 100, 0)
       
   100 
       
   101 def investment(portfolio: List[String], years: Range, start_balance: Long): Long = {
    76 def investment(portfolio: List[String], years: Range, start_balance: Long): Long = {
   102   compound_yield(get_deltas(get_prices(portfolio, years)), start_balance, 0)
    77   compound_yield(get_deltas(get_prices(portfolio, years)), start_balance, 0)
   103 }
    78 }
   104 
    79 
   105 
    80 
   106 
    81 
   107 //test cases for the two portfolios given above
    82 //test cases for the two portfolios given above
   108 
    83 
   109 //println("Real data: " + investment(rstate_portfolio, 1978 to 2017, 100))
    84 println("Real data: " + investment(rstate_portfolio, 1978 to 2017, 100))
   110 //println("Blue data: " + investment(blchip_portfolio, 1978 to 2017, 100))
    85 println("Blue data: " + investment(blchip_portfolio, 1978 to 2017, 100))
   111 
    86 
   112 
    87 
   113 }
    88 }