Tuomas Hietanen Thorium

Chief Technology Officer, F# (fsharp) - developer

Thorium / DecisionTree.fs

Last active May 16, 2018 15:32

Wine-quality decision-tree using Accord.Net from F#

	(*

	Install-Package FSharp.Data
	Install-Package Accord
	Install-Package Accord.MachineLearning
	Install-Package Accord.Math
	Install-Package Accord.Statistics

	*)
	#if INTERACTIVE

Thorium / extension.fs

Created May 8, 2017 19:07

Visual Studio 2017 extension: Displaying Light Bulb Suggestions

	// Example follows this, translated to FSharp:
	// https://msdn.microsoft.com/en-us/library/dn903708.aspx

	// Just instead of copy&pasting C#, add a new F# class library and paste this code to there,
	// then add that to reference to your C#-project.

	// If you want to deploy without C# project, see e.g. this:
	// You need to use some VSIX-package to deploy the code:
	// https://github.com/fsharp-vsix/FsVSIX

Thorium / ml.fs

Created March 28, 2017 10:39

Using machine learning tool Accord.Net from F#

	// This example uses the same data and methods as
	// http://accord-framework.net/docs/html/T_Accord_Statistics_Models_Regression_LogisticRegression.htm

	#I @"./packages"
	#r @"FSharp.Data.2.3.2/lib/net40/FSharp.Data.dll"
	#r @"Accord.3.4.0/lib/net45/Accord.dll"
	#r @"Accord.MachineLearning.3.4.0/lib/net45/Accord.MachineLearning.dll"
	#r @"Accord.Math.3.4.0/lib/net45/Accord.Math.Core.dll"
	#r @"Accord.Math.3.4.0/lib/net45/Accord.Math.dll"
	#r @"Accord.Statistics.3.4.0/lib/net45/Accord.Statistics.dll"

Thorium / BtcBalance.fs

Created February 2, 2017 21:54

Get Bitcoin wallet account balance by public key

Thorium / BtcPrice.fsx

Created February 2, 2017 18:14

Bitcoin current price data from blockchain.info

	//Using FSharp.Data
	type BtcData = FSharp.Data.JsonProvider<"""{
	"USD":{"15m":1.1,"last":1.1,"buy":1.1,"sell":1.1,"symbol":"$"},
	"EUR":{"15m":1.1,"last":1.1,"buy":1.1,"sell":1.1,"symbol":"€"},
	"GBP":{"15m":1.1,"last":1.1,"buy":1.1,"sell":1.1,"symbol":"£"}
	}""">

	let prices = BtcData.Load("https://blockchain.info/ticker")
	//prices.Eur.Buy : val it : decimal = 923.52M (at 02/02/2017)
	//prices.Gbp.Sell : val it : decimal = 794.61M (at 02/02/2017)

Thorium / BlockChain.fs

Last active September 27, 2021 02:26

Using NBitcoin to create private BlockChain with F# (FSharp)

	// This is just an initial example / tech-demo.
	#if INTERACTIVE
	#I "./../packages/NBitcoin/lib/net45/"
	#I "./../packages/Newtonsoft.Json/lib/net45"
	#r "NBitcoin.dll"
	#r "Newtonsoft.Json.dll"
	#else
	module BlockChain
	#endif

Thorium / btc.fs

Last active February 2, 2017 21:49

BTC transfers with NBitcoin with FSharp

	//Add reference to NBitcoin
	#if INTERACTIVE
	#I "./../packages/NBitcoin.3.0.1.6/lib/net45/"
	#I "./../packages/Newtonsoft.Json.9.0.1/lib/net45"
	#r "NBitcoin.dll"
	#r "Newtonsoft.Json.dll"
	#endif

	open System
	open NBitcoin

Thorium / graphgen.fs

Created December 9, 2016 20:23

How you can programmatically use GraphViz from F#

	// 1. Install: http://www.graphviz.org/Download..php
	//
	// 2. Add <appSettings> under <configuration> to app.config/web.config
	// Add Nuget / Paket: GraphViz.NET
	//
	// 3. Add under <configuration><appSettings>:
	// <add key="graphVizLocation" value="C:\Program Files (x86)\Graphviz2.38\bin" />
	//
	// Add references to System.Configuration.dll and System.Drawing.dll

Thorium / rss.fs

Last active September 10, 2016 13:54

Generate RSS feed from a list of F# record items using Linq2Xml. To use e.g. to generate feeds from your web server.

Thorium / ecb.fs

Created June 7, 2016 09:55

Fetch EUR based currency rates of the day and parse currency conversion rates from European Central Bank