ironcalc_base 0.7.1

Open source spreadsheet engine
Documentation 
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
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140

#![allow(clippy::unwrap_used)]

use crate::test::util::new_empty_model;

#[test]
fn test_fn_chisq_dist_smoke() {
    let mut model = new_empty_model();

    // Valid: CDF
    model._set("A1", "=CHISQ.DIST(0.5, 4, TRUE)");

    // Valid: PDF
    model._set("A2", "=CHISQ.DIST(0.5, 4, FALSE)");

    // Valid: CDF with numeric cumulative (1 -> TRUE)
    model._set("A3", "=CHISQ.DIST(0.5, 4, 1)");

    // Wrong number of args -> #ERROR!
    model._set("A4", "=CHISQ.DIST(0.5, 4)");
    model._set("A5", "=CHISQ.DIST(0.5, 4, TRUE, FALSE)");

    // Domain errors
    // x < 0 -> #NUM!
    model._set("A6", "=CHISQ.DIST(-1, 4, TRUE)");
    // deg_freedom < 1 -> #NUM!
    model._set("A7", "=CHISQ.DIST(0.5, 0, TRUE)");

    model.evaluate();

    // Values for df = 4
    // CDF(0.5) ≈ 0.026499021, PDF(0.5) ≈ 0.097350098
    assert_eq!(model._get_text("A1"), *"0.026499021");
    assert_eq!(model._get_text("A2"), *"0.097350098");
    assert_eq!(model._get_text("A3"), *"0.026499021");

    assert_eq!(model._get_text("A4"), *"#ERROR!");
    assert_eq!(model._get_text("A5"), *"#ERROR!");
    assert_eq!(model._get_text("A6"), *"#NUM!");
    assert_eq!(model._get_text("A7"), *"#NUM!");
}

#[test]
fn test_fn_chisq_dist_rt_smoke() {
    let mut model = new_empty_model();

    // Valid calls
    model._set("A1", "=CHISQ.DIST.RT(0.5, 4)");
    model._set("A2", "=CHISQ.DIST.RT(5, 4)");

    // Too few / too many args -> #ERROR!
    model._set("A3", "=CHISQ.DIST.RT(0.5)");
    model._set("A4", "=CHISQ.DIST.RT(0.5, 4, 1)");

    // Domain errors
    // x < 0 -> #NUM!
    model._set("A5", "=CHISQ.DIST.RT(-1, 4)");
    // deg_freedom < 1 -> #NUM!
    model._set("A6", "=CHISQ.DIST.RT(0.5, 0)");

    model.evaluate();

    // For df = 4:
    // right tail at 0.5 ≈ 0.973500979
    // right tail at 5.0 ≈ 0.287297495
    assert_eq!(model._get_text("A1"), *"0.973500979");
    assert_eq!(model._get_text("A2"), *"0.287297495");

    assert_eq!(model._get_text("A3"), *"#ERROR!");
    assert_eq!(model._get_text("A4"), *"#ERROR!");
    assert_eq!(model._get_text("A5"), *"#NUM!");
    assert_eq!(model._get_text("A6"), *"#NUM!");
}

#[test]
fn test_fn_chisq_inv_smoke() {
    let mut model = new_empty_model();

    // Valid calls
    model._set("A1", "=CHISQ.INV(0.95, 4)");
    model._set("A2", "=CHISQ.INV(0.1, 10)");

    // Wrong number of args -> #ERROR!
    model._set("A3", "=CHISQ.INV(0.95)");
    model._set("A4", "=CHISQ.INV(0.95, 4, 1)");

    // Domain errors
    // probability < 0 or > 1 -> #NUM!
    model._set("A5", "=CHISQ.INV(-0.1, 4)");
    model._set("A6", "=CHISQ.INV(1.1, 4)");
    // deg_freedom < 1 -> #NUM!
    model._set("A7", "=CHISQ.INV(0.5, 0)");

    model.evaluate();

    // Standard critical values:
    // CHISQ.INV(0.95, 4) ≈ 9.487729037
    // CHISQ.INV(0.1, 10) ≈ 4.865182052
    assert_eq!(model._get_text("A1"), *"9.487729037");
    assert_eq!(model._get_text("A2"), *"4.865182052");

    assert_eq!(model._get_text("A3"), *"#ERROR!");
    assert_eq!(model._get_text("A4"), *"#ERROR!");
    assert_eq!(model._get_text("A5"), *"#NUM!");
    assert_eq!(model._get_text("A6"), *"#NUM!");
    assert_eq!(model._get_text("A7"), *"#NUM!");
}

#[test]
fn test_fn_chisq_inv_rt_smoke() {
    let mut model = new_empty_model();

    // Valid calls
    model._set("A1", "=CHISQ.INV.RT(0.05, 4)");
    model._set("A2", "=CHISQ.INV.RT(0.9, 10)");

    // Wrong number of args -> #ERROR!
    model._set("A3", "=CHISQ.INV.RT(0.05)");
    model._set("A4", "=CHISQ.INV.RT(0.05, 4, 1)");

    // Domain errors
    // probability < 0 or > 1 -> #NUM!
    model._set("A5", "=CHISQ.INV.RT(-0.1, 4)");
    model._set("A6", "=CHISQ.INV.RT(1.1, 4)");
    // deg_freedom < 1 -> #NUM!
    model._set("A7", "=CHISQ.INV.RT(0.5, 0)");

    model.evaluate();

    // For chi-square:
    // CHISQ.INV.RT(0.05, 4) = CHISQ.INV(0.95, 4) ≈ 9.487729037
    // CHISQ.INV.RT(0.9, 10)  = CHISQ.INV(0.1, 10) ≈ 4.865182052
    assert_eq!(model._get_text("A1"), *"9.487729037");
    assert_eq!(model._get_text("A2"), *"4.865182052");

    assert_eq!(model._get_text("A3"), *"#ERROR!");
    assert_eq!(model._get_text("A4"), *"#ERROR!");
    assert_eq!(model._get_text("A5"), *"#NUM!");
    assert_eq!(model._get_text("A6"), *"#NUM!");
    assert_eq!(model._get_text("A7"), *"#NUM!");
}