다른 행 값을 기반으로하는 F #의 행 값 추가

Question

이것은 F # 용입니다.

나는 4 행이있는 .data 파일이 있습니다. 마을, 인구, 자치 도시, 시골 또는 도시 유형의 마을. Int32.Parse를 사용하여 "population"열을 이미 파싱했습니다.

제 질문은, 자치 도시 이름을 기반으로하는 모든 행의 인구를 어떻게 추가 할 수 있습니까? 동일한 시정촌에 속해 있으며 같은 시정촌에있는 인구를 추가하려는 여러 도시가 있습니다.

이

내가 지금까지 어떤 도움이 감사 한 코드입니다 :

open System 

let rec convertDataRow(csvLine:string) = 
    let cells = List.ofSeq(csvLine.Split(',')) 
    match cells with 
    | name :: popul :: county :: townorcommune :: _ -> 
    let parsedNumber = Int32.Parse(popul) 
    (name, parsedNumber, county, townorcommune) 
    | _ -> failwith "Incorrect data format!" 

let rec processLines (lines) = 
    match lines with 
    | [] -> [] 
    | currentLine :: remaining -> 
    let parsedLine = convertDataRow(currentLine) 
    let parsedRest = processLines(remaining) 
    parsedLine :: parsedRest 

open System.IO 
let lines = List.ofSeq(File.ReadAllLines(@"C:\Users\townspopulation.data")) 

processLines(lines) 

Answer 1

몇 가지 지침을 제공합니다.

Seq.groupBy을 사용하여 데이터를 이름순으로 정렬하면 항목을 추가 할 수 있습니다. 여기

Seq.groupBy (fun (a,_,_,_) -> a) 
|> Seq.map (Seq.fold (fun (sum,_) (n,a,_,_) -> (sum+a),n) (0,"")) 

우리는 우리가 원하는 것을에 의해 정렬 된 데이터를 얻을 수 GROUPBY를 사용 비슷해,지도를 사용 인구 이것에 대한 더 짧은 한 줄이 있습니다