ygrenzinger

package com.sfr.checkout.util;

import org.joda.time.DateTime;

import javax.xml.datatype.XMLGregorianCalendar;

/**
 * Created by ygrenzinger on 30/04/2014.
 */
public class GregorianToJodaTimeConverter {

ygrenzinger

import java.util.ArrayList;
import java.util.List;
import java.util.function.Function;
import java.util.function.Supplier;
import java.util.stream.Collectors;

public class Concurrent<A> {

	private final Function<Function<A, Action>, Action> func;

ygrenzinger

------------------------------------------------------------------------------------------------------------------------------
-- ROSE TREES, FUNCTORS, MONOIDS, FOLDABLES
------------------------------------------------------------------------------------------------------------------------------

data Rose a = a :> [Rose a] deriving Show

-- ===================================
-- Ex. 0-2
-- ===================================

ygrenzinger

package com.mycompany.myapp.domain;

import java.time.ZonedDateTime;
import java.util.Date;
import com.datastax.driver.mapping.annotations.*;
import com.fasterxml.jackson.annotation.JsonIgnore;
import org.hibernate.validator.constraints.Email;

import javax.validation.constraints.NotNull;
import javax.validation.constraints.Pattern;

ygrenzinger

ygrenzinger

ygrenzinger

Hello,

I have done a lot of hard work to have an acceptable dataviz. D3.js is powerfull but really difficult to tweak when you want a perfect design. Hope you will find it interesting.

I wanted to use a Treemap because I love this dataviz but I should first found a good data for this. The budget data is perfect for this and Treemap is a great layout to have a quick and clear understanding where the budget is spend.

I have finally used the Paris (France) annual budget available here: http://opendata.paris.fr/explore/dataset/budget-votes-ap-autotrisations-de-programmes/?tab=metas

I had first to filter the data to keep only the expenditure then convert the CSV format to a nested JSON using the following code:

ygrenzinger

open System

let readIntValue () : int =
    let canparse, keyin = Int32.TryParse(Console.ReadLine())
    if canparse then keyin
    else 0

let readPerson (index : int) : (string * int) =
    Console.WriteLine("info of person number {0}", index)
    Console.WriteLine("Enter name: ")

ygrenzinger

open System
 
type Person = {
    Name : string
    Age  : int
}
 
let deal (person: Person) =
    match person with
    | { Person.Name = name; Person.Age = age } when age >= 20 -> printfn "%s is adult." name

ygrenzinger

open System
 
let goldenratio = (1.0 + Math.Sqrt(5.0)) / 2.0
let calculateRatio x = x * goldenratio

let rec inputValue () : int =
    Console.WriteLine("Please input value")
    let couldParse, i = Int32.TryParse(Console.ReadLine())
    if couldParse then i
    else inputValue()