Graphics 如何在OCaml中画一条线？_Graphics_Ocaml

Graphics 如何在OCaml中画一条线？

graphics ocaml

Graphics 如何在OCaml中画一条线？,graphics,ocaml,Graphics,Ocaml,我试着用OCaml（try.ocamlpro.com）画一些东西。我不知道如何画一条线，例如使用函数“plot x y”的x=y。最后，我尝试了类似的方法，但显然不起作用： open Graphics;; Graphics.open_graph " 200x200";; for i = 0 to x do plot i (f i) done let g x = 2*x read_line ();; 有什么帮助（或例子）？谢谢。我看不出你有

我试着用OCaml（try.ocamlpro.com）画一些东西。我不知道如何画一条线，例如使用函数“plot x y”的x=y。最后，我尝试了类似的方法，但显然不起作用：

open Graphics;;
Graphics.open_graph " 200x200";;
       for i = 0 to x do
        plot i (f i)
       done
    let g x = 2*x
read_line ();;

有什么帮助（或例子）？

谢谢。我看不出你有什么问题。当我尝试你的代码，修改一点，我可以画一条线，你想要的。首先，您需要初始化窗口：

open Graphics;;
Graphics.open_graph " 200x200";;

然后需要定义函数

：

let f x = x + 1;;

然后使用函数

plot

for i = 0 to 200 do
   plot i (f i)
done;;

瞧

我看不出你有什么问题。当我尝试你的代码，修改一点，我可以画一条线，你想要的。首先，您需要初始化窗口：

open Graphics;;
Graphics.open_graph " 200x200";;

然后需要定义函数

：

let f x = x + 1;;

然后使用函数

plot

for i = 0 to 200 do
   plot i (f i)
done;;

瞧

还有基于海龟型系统的

Graphics.lineto

：

Graphics.open_graph " 200x200";;
Graphics.lineto 100 100;;

将当前点（默认值为

0，0

）更改为提供的

x y

点，并绘制一条连接这两个点的线

您可以使用

moveto:int->int->unit

设置当前点

有关更多信息，请参见。