Printing 在erlang中打印单元格网格

Printing 在erlang中打印单元格网格,printing,erlang,Printing,Erlang,我对erlang和编程都是新手 我想创建一个单元格“网格”,其中单元格显示为: + + + + + + + + + + + + + + + + + + + + 我知道的是网格的宽度和高度 因此,例如,3x3网格表示为: + + + + + + + + + + + + + + + + + + + + 打印网格(高度、宽度)-> 而不是这里的一些代码 有人能告诉我如何解决这个问题吗?我怀疑您不需要其他功能,比

我对erlang和编程都是新手

我想创建一个单元格“网格”,其中单元格显示为:

+   +

+   +
+  +  +  + 

+  +  +  +

+  +  +  +

+  +  +  +
我知道的是网格的宽度和高度

因此,例如,3x3网格表示为:

+   +

+   +
+  +  +  + 

+  +  +  +

+  +  +  +

+  +  +  +
打印网格(高度、宽度)
-> 而不是这里的一些代码


有人能告诉我如何解决这个问题吗?

我怀疑您不需要其他功能,比如在单元格中添加一些字符,但您应该能够修改此功能:

4> Pgrid= fun(W,H) -> L = lists:foldl(fun(_,Acc) -> "+   " ++ Acc end,"~n~n",lists:seq(1,W+1)),
4>        G = lists:foldl(fun(_,Acc)-> L ++ Acc end,[],lists:seq(1,H+1)), 
4>        io:format(G)                                                                                
4>        end.                                                                                        
#Fun<erl_eval.12.54118792>
5> Pgrid(6,3).                                                                                 
+   +   +   +   +   +   +   

+   +   +   +   +   +   +   

+   +   +   +   +   +   +   

+   +   +   +   +   +   +   

ok
6> 
4>Pgrid=fun(W,H)->L=list:foldl(fun(u,Acc)->“+”++Acc end,“~n~n”,list:seq(1,W+1)),
4> G=列表:foldl(fun(u,Acc)->L++Acc end,[],列表:seq(1,H+1)),
4> io:格式(G)
4> 结束。
#乐趣
5> Pgrid(6,3)。
+   +   +   +   +   +   +   
+   +   +   +   +   +   +   
+   +   +   +   +   +   +   
+   +   +   +   +   +   +   
好啊
6> 

对于此问题,您可以使用此功能

grid(_,0)->ok;

grid(W,H)->
    io:format(string:copies("+   ",W-1)++"+~n~n"),
    grid(W,H-1).
输出:

sol:grid(6,3).
+   +   +   +   +   +

+   +   +   +   +   +

+   +   +   +   +   +



15> sol:grid(3,3).
+   +   +

+   +   +

+   +   +

我不太清楚投反对票是为了什么。OP是编程的新手,所以函数负责人不可能独自解决这个问题。关于如何开始编程,有很多指南。这个“问题”更多的是一个“请给我代码”的情况,不涉及任何行动方面的努力。