Skip to content

Instantly share code, notes, and snippets.

Keybase proof

I hereby claim:

  • I am rubenoen on github.
  • I am eduke (https://keybase.io/eduke) on keybase.
  • I have a public key ASCacuMfB2zIBc0u9aRuhQ43fKpqICNPv_uiq2u3uk-I5wo

To claim this, I am signing this object:

// This F# dojo is directly inspired by the
// Digit Recognizer competition from Kaggle.com:
// http://www.kaggle.com/c/digit-recognizer
// The datasets below are simply shorter versions of
// the training dataset from Kaggle.
// The goal of the dojo will be to
// create a classifier that uses training data
// to recognize hand-written digits, and
// evaluate the quality of our classifier
let people = [1..1500]
let rec removeppl (x: list<int>) =
match x with
|[] -> []
|head ::[] -> [head]
|head :: tail -> List.append [x.Head] (removeppl x.Tail.Tail)
let rec removeallppl (x: list<int>) =
open System.Collections.Generic;;
let dict = new Dictionary<string, int>()
let img = "c:/temp/santa.png"
let bitmap = new System.Drawing.Bitmap(img)
let width = [0..bitmap.Width-1]
let heigth = [0..bitmap.Height-1]
let colors = width |> List.map (
fun x -> heigth |>