| 
     1 // Part 2 about Alcohol-Consumption Worldwide  | 
         | 
     2 //============================================  | 
         | 
     3   | 
         | 
     4   | 
         | 
     5 // (1) Complete the function that is given a list of floats  | 
         | 
     6 // and calculuates the indices for when to buy the commodity   | 
         | 
     7 // and when to sell  | 
         | 
     8   | 
         | 
     9   | 
         | 
    10 // (2) Complete the ``get webpage'' function that takes a  | 
         | 
    11 // a stock symbol as argument and queries the Yahoo server  | 
         | 
    12 // at  | 
         | 
    13 //      http://ichart.yahoo.com/table.csv?s=<<insert stock symbol>>  | 
         | 
    14 //   | 
         | 
    15 // This servive returns a CSV-list that needs to be separated into  | 
         | 
    16 // a list of strings.  | 
         | 
    17   | 
         | 
    18 import io.Source  | 
         | 
    19 import scala.util._  | 
         | 
    20   | 
         | 
    21 def get_csv_page(url: String) : List[String] =   | 
         | 
    22   Source.fromURL(url)("ISO-8859-1").getLines.toList | 
         | 
    23   | 
         | 
    24 def get_csv_file(file: String) : List[String] =   | 
         | 
    25   Source.fromFile(file)("ISO-8859-1").getLines.toList | 
         | 
    26   | 
         | 
    27   | 
         | 
    28 val url_alcohol =   | 
         | 
    29   "https://raw.githubusercontent.com/fivethirtyeight/data/master/alcohol-consumption/drinks.csv"  | 
         | 
    30   | 
         | 
    31 val file_population =   | 
         | 
    32   "population.cvs"  | 
         | 
    33   | 
         | 
    34 get_csv_page(url_alcohol)  | 
         | 
    35 get_csv_file(file_population)  | 
         | 
    36   | 
         | 
    37 get_csv_page(url_alcohol).size  | 
         | 
    38 get_csv_file(file_population).size  | 
         | 
    39   | 
         | 
    40 val alcs = get_csv_page(url_alcohol)  | 
         | 
    41 val pops = get_csv_file(file_population)  | 
         | 
    42   | 
         | 
    43   | 
         | 
    44 def process_alcs(lines: List[String]) : List[(String, Double)] =  | 
         | 
    45   for (l <- lines) yield { | 
         | 
    46     val entries = l.split(",").toList  | 
         | 
    47     (entries(0), entries(4).toDouble)   | 
         | 
    48   }  | 
         | 
    49   | 
         | 
    50 def process_pops(lines: List[String]) : Map[String, Long] =  | 
         | 
    51   (for (l <- lines) yield { | 
         | 
    52     val entries = l.split(",").toList  | 
         | 
    53     (entries(0), entries(1).toLong)  | 
         | 
    54   }).toMap  | 
         | 
    55   | 
         | 
    56   | 
         | 
    57 def sorted_country_consumption() : List[(String, Long)] = { | 
         | 
    58   val alcs2 = process_alcs(alcs.drop(1))  | 
         | 
    59   val pops2 = process_pops(pops.drop(1))  | 
         | 
    60   val cons_list =   | 
         | 
    61     for ((cname, cons) <- alcs2; if pops2.isDefinedAt(cname)) yield (cname, (cons * pops2(cname)).toLong)  | 
         | 
    62   cons_list.sortBy(_._2).reverse  | 
         | 
    63 }  | 
         | 
    64   | 
         | 
    65 sorted_country_consumption().take(10)  | 
         | 
    66 sorted_country_consumption().size  | 
         | 
    67   | 
         | 
    68 consumption.foreach { println }  | 
         | 
    69   | 
         | 
    70 def percentage(n: Int) : (Long, Long, Double) = { | 
         | 
    71   val cons_list = sorted_country_consumption()  | 
         | 
    72   val sum_n = cons_list.take(n).map(_._2).sum  | 
         | 
    73   val sum_all = cons_list.map(_._2).sum  | 
         | 
    74   val perc = (sum_n.toDouble / sum_all.toDouble) * 100.0  | 
         | 
    75   (sum_all, sum_n, perc)  | 
         | 
    76 }  | 
         | 
    77   | 
         | 
    78 percentage(164)  | 
         | 
    79   |