鱼类抽样调查

GeoGebra 命令及参数

1. Sequence(i, i, 1, fish) → list1
2. Sample(list1, samp) → takesamp
3. Sequence(If[Element[takesamp, i] ≤ tagged, 1, 0], i, 1, samp) → taggedyn
4. Sequence(Element[taggedyn, i], i, 1, ani) → anisamp
5. Sum(anisamp) → totaltagged
6. Textfield(tagged) → inputBox1
7. Textfield(samp) → inputBox2
8. Polygon(B, C, D, E) → poly1, b, c, d, e
9. Point(xAxis) → F
10. Point(xAxis) → G
11. Polygon(E, F, G, D) → poly2, e_1, f, g, d_1
12. Point(b) → H
13. Point(f) → I
14. Segment(H, I) → a