ellip-plot-graph 1.0.5

Generate plots for Ellip crate
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

/*
 * Ellip is licensed under The 3-Clause BSD, see LICENSE.
 * Copyright 2025 Sira Pornsiriprasert <code@psira.me>
 */

use ellip::cel2;
use ellip_plot_graph::*;
use plotly::{
    Layout, Plot, Scatter,
    color::NamedColor,
    common::{Line, Mode},
    layout::{Annotation, Axis},
};

macro_rules! get_trace {
    ($kc: expr, $a: expr, $b: expr, $name: expr) => {{
        let value = $kc
            .iter()
            .map(|&kci| match cel2(kci, $a, $b) {
                Ok(ans) => ans,
                Err(_) => f64::NAN,
            })
            .collect();

        Scatter::new($kc.clone(), value)
            .mode(Mode::Lines)
            .name($name)
    }};
    ($kc: expr, $a: expr, $b: expr, $name: expr, $line_color: expr) => {
        get_trace!($kc, $a, $b, $name).line(Line::new().color($line_color))
    };
}

fn main() -> Result<(), Box<dyn std::error::Error>> {
    let n_points = 100;
    let range_kc = [-3, 3];
    let mut kc: Vec<f64> = [
        (range_kc[0] * n_points..=range_kc[1] * n_points)
            .map(|x| x as f64 / n_points as f64)
            .collect::<Vec<f64>>(),
        // Make the plot more dense near zero to improve the visual
        (-10..10)
            .map(|x| x as f64 / 1000.0)
            .skip(1)
            .collect::<Vec<f64>>(),
    ]
    .concat();
    kc.sort_by(|a, b| a.partial_cmp(b).unwrap());

    let mut plot = Plot::new();
    plot.add_traces(vec![
        get_trace!(&kc, 3.0, 3.0, "a=3, b=3", NamedColor::Red),
        get_trace!(&kc, 1.0, 3.0, "a=1, b=3"),
        get_trace!(&kc, 3.0, 1.0, "a=3, b=1"),
        get_trace!(&kc, 1.0, 1.0, "a=1, b=1", NamedColor::Blue),
    ]);
    plot.set_layout(
        Layout::new()
            .title("Bulirsch's Complete Elliptic Integral of the Second Kind (cel2)")
            .x_axis(Axis::new().title("kc").show_line(true))
            .y_axis(
                Axis::new()
                    .title("cel2(kc,a,b)")
                    .show_line(true)
                    // .range(vec![0.0, 4.0]),
            )
            .legend(
                plotly::layout::Legend::new()
                    .x(1.0)
                    .x_anchor(plotly::common::Anchor::Right)
            )
            .annotations(vec![Annotation::new()
            .text(format!(
                "Generated using <a href=\"https://docs.rs/ellip/latest/ellip/bulirsch/fn.cel2.html\" target=\"_blank\">cel2</a> from <a href=\"https://crates.io/crates/ellip\" target=\"_blank\">ellip</a> v{}",
                ellip_version()
            ))
                .x_ref("paper")
                .y_ref("paper")
                .y(-0.15)
                .x(1.08)
                .show_arrow(false)]),
    );

    make_html!(plot, "cel2.html");
    write_svg!(plot, "cel2.html", 1000, 600, 1.0);
    Ok(())
}