Skip to content

Instantly share code, notes, and snippets.

#load "../packages/XPlot.GoogleCharts.1.0.1/XPlot.GoogleCharts.fsx"
open XPlot.GoogleCharts
let diagram =
[
"A", "X", 5
"A", "Y", 7
"A", "Z", 6
"B", "X", 2
#load "../packages/XPlot.GoogleCharts.1.0.1/XPlot.GoogleCharts.fsx"
open XPlot.GoogleCharts
let chart =
[
"Work", 11
"Eat", 2
"Commute", 2
"Watch TV", 2
#load "../packages/XPlot.GoogleCharts.1.0.1/XPlot.GoogleCharts.fsx"
open XPlot.GoogleCharts
let options = Options(showTip = true)
let chart =
[
"China", "China: 1,363,800,000"
"India", "India: 1,242,620,000"
#load "../packages/XPlot.GoogleCharts.1.0.1/XPlot.GoogleCharts.fsx"
open XPlot.GoogleCharts
let sales = ["2013", 1000; "2014", 1170; "2015", 660; "2016", 1030]
let expenses = ["2013", 400; "2014", 460; "2015", 1120; "2016", 540]
let options =
Options(
title = "Company Performance",
#load "../packages/XPlot.GoogleCharts.1.0.1/XPlot.GoogleCharts.fsx"
open XPlot.GoogleCharts
let data =
[
"Acrocanthosaurus (top-spined lizard)", 12.2
"Albertosaurus (Alberta lizard)", 9.1
"Allosaurus (other lizard)", 12.2
"Apatosaurus (deceptive lizard)", 22.9
#load "../packages/XPlot.GoogleCharts.1.0.1/XPlot.GoogleCharts.fsx"
open XPlot.GoogleCharts
let data =
[
"Rome", 2761477, 1285.31
"Milan", 1324110, 181.76
"Naples", 959574, 117.27
"Turin", 907563, 130.17
#load "../packages/XPlot.GoogleCharts.1.0.1/XPlot.GoogleCharts.fsx"
open XPlot.GoogleCharts
let data = ["Memory", 80; "CPU", 55; "Network", 68]
let options =
Options(
width = 400,
height = 120,
#load "../packages/XPlot.GoogleCharts.1.0.1/XPlot.GoogleCharts.fsx"
open XPlot.GoogleCharts
let Bolivia = ["2004/05", 165.; "2005/06", 135.; "2006/07", 157.; "2007/08", 139.; "2008/09", 136.]
let Ecuador = ["2004/05", 938.; "2005/06", 1120.; "2006/07", 1167.; "2007/08", 1110.; "2008/09", 691.]
let Madagascar = ["2004/05", 522.; "2005/06", 599.; "2006/07", 587.; "2007/08", 615.; "2008/09", 629.]
let ``Papua New Guinea`` = ["2004/05", 998.; "2005/06", 1268.; "2006/07", 807.; "2007/08", 968.; "2008/09", 1026.]
let Rwanda = ["2004/05", 450.; "2005/06", 288.; "2006/07", 397.; "2007/08", 215.; "2008/09", 366.]
let average = ["2004/05", 614.6; "2005/06", 682.; "2006/07", 623.; "2007/08", 609.4; "2008/09", 569.6]
#load "../packages/XPlot.GoogleCharts.1.0.1/XPlot.GoogleCharts.fsx"
open XPlot.GoogleCharts
let sales = ["2013", 1000; "2014", 1170; "2015", 660; "2016", 1030]
let expenses = ["2013", 400; "2014", 460; "2015", 1120; "2016", 540]
let options = Options()
options.title <- "Company Performance"
#load "../packages/XPlot.GoogleCharts.1.0.1/XPlot.GoogleCharts.fsx"
open XPlot.GoogleCharts
let data =
[
"Mon", 20, 28, 38, 45
"Tue", 31, 38, 55, 66
"Wed", 50, 55, 77, 80
"Thu", 77, 77, 66, 50