我正在寻找一种方法将两个int
写入文件。将有两对int
对。在两个数字之间应该有一个空格(我的意思是'')。例如,像这样:
1 2
6 896
243 865
....
答案 0 :(得分:6)
您可以使用以下内容:
let rec print_numbers oc = function
| [] -> ()
| e::tl -> Printf.fprintf oc "%d %d\n" (fst e) (snd e); print_numbers oc tl
let () =
let nums = [(1, 2); (6, 896); (243, 865)] in
let oc = open_out "filename.txt" in
print_numbers oc nums;
close_out oc;
这假设您的数据是成对列表。
答案 1 :(得分:4)
如果您使用Core
,则可以执行此操作:
open Core.Std
let () = Out_channel.write_all "your_file.txt" ~data:"Your text"