-
Notifications
You must be signed in to change notification settings - Fork 81
/
Accessible_Contours.fs
96 lines (85 loc) · 2.86 KB
/
Accessible_Contours.fs
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
module Accessible_Contrours_TestCharts
open Plotly.NET
open Plotly.NET.TraceObjects
open Plotly.NET.LayoutObjects
// https://github.com/plotly/Plotly.NET/issues/426
module ``Contours should be accessible #426`` =
let ``Contour chart with more contours settings`` =
// max z is 10
Chart.Contour(
zData = [
[5;2;3]
[10;2;1]
[0;5;1]
],
ShowContoursLabels = true,
ShowContourLines = true,
ContoursStart = 0,
ContoursEnd = 15,
UseDefaults = false
)
|> Chart.withColorAxisAnchor(1)
let ``Histogram2DContour chart with more contours settings`` =
// max z is 5
Chart.Histogram2DContour(
X = [1;1;2;2;2;2;2;3;4;5],
Y = [1;1;2;2;2;2;2;3;4;5],
ShowContoursLabels = true,
ShowContourLines = true,
ContoursStart = 0,
ContoursEnd = 15,
UseDefaults = false
)
|> Chart.withColorAxisAnchor(1)
let ``PointDensity chart with accessible contours settings`` =
// max z is 15
Chart.PointDensity(
x = [1;1;2;2;2;2;2;2;2;2;2;2;2;2;2;2;2;3;4;5],
y = [1;1;2;2;2;2;2;2;2;2;2;2;2;2;2;2;2;3;4;5],
ShowContoursLabels = true,
ShowContourLines = true,
ContoursStart = 0,
ContoursEnd = 15,
UseDefaults = false
)
|> Chart.withColorAxisAnchor(1)
let ``Contours trace Grid chart with shared color axis and adapted contours ranges`` =
[
// max z is 10
Chart.Contour(
zData = [
[5;2;3]
[10;2;1]
[0;5;1]
],
ShowContoursLabels = true,
ShowContourLines = true,
ContoursStart = 0,
ContoursEnd = 15,
UseDefaults = false
)
|> Chart.withColorAxisAnchor(1)
// max z is 5
Chart.Histogram2DContour(
X = [1;1;2;2;2;2;2;3;4;5],
Y = [1;1;2;2;2;2;2;3;4;5],
ShowContoursLabels = true,
ShowContourLines = true,
ContoursStart = 0,
ContoursEnd = 15,
UseDefaults = false
)
|> Chart.withColorAxisAnchor(1)
// max z is 15
Chart.PointDensity(
x = [1;1;2;2;2;2;2;2;2;2;2;2;2;2;2;2;2;3;4;5],
y = [1;1;2;2;2;2;2;2;2;2;2;2;2;2;2;2;2;3;4;5],
ShowContoursLabels = true,
ShowContourLines = true,
ContoursStart = 0,
ContoursEnd = 15,
UseDefaults = false
)
|> Chart.withColorAxisAnchor(1)
]
|> Chart.Grid(2,2)