如何在F#中编写csv？

Question

如何将F#中的记录写入csv？对于某个变量的每个实例,最好有一行.我的记录和最终输出是如下所示的地图.

type Family =
    { Month : int
      Year : int
      Income : float
      Family : int
      Dogs : int
      Cats : int
    }

let monthly =
    timeMap
    |> Seq.ofList
    |> Seq.map(fun ((month,year), rows) ->
        { Month = month
          Year = year
          Income = rows.Inc
          Family = familyMap.[(month,year)].Children
          Dogs = familyMap.[(month,year)].Dogs
          Cats = familyMap.[(month,year)].Cats
        })
    |> List.ofSeq

let map = 
    monthly
    |> List.map (fun x -> (x.Year,x.Month),x)
    |> Map.ofList 

EDITED

这是我尝试过的,但我得到了错误(A,B,C,D,E,F) are not defined,那就是it is recommended that I use the syntax new (type) args.最后一个错误出现在>> MyCsvType

type MyCsvType = CsvProvider<Schema = "A (int), B (int), C (float), D (int), E (int), F (int)", HasHeaders = false>
let myCsvBuildRow (x:Family) = MyCsvType.Row(x.A,x.B,x.C,x.D,x.E,x.F)
let myCsvBuildTable = (Seq.map myCsvBuildRow) >> Seq.toList >> MyCsvType
let myCsv = monthly|> myCsvBuildTable
myCsv.SaveToString()

Answer 1

您的代码几乎就在那里,除了该myCsvBuildRow函数需要Family使用正确的名称访问该类型的成员.在您的版本,您正在访问的名字,如A,B等,但这些都是列的名称在CSV文件中,F#的纪录成员没有名字.以下是我的诀窍:

type MyCsvType = CsvProvider<Schema = "A (int), B (int), C (float), D (int), E (int), F (int)", HasHeaders = false>

let myCsvBuildRow (x:Family) = 
  MyCsvType.Row(x.Month,x.Year,x.Income,x.Family,x.Dogs,x.Cats)
let myCsvBuildTable data = 
  new MyCsvType(Seq.map myCsvBuildRow data)

let myCsv = family |> myCsvBuildTable
myCsv.SaveToString()