F #에서 평균 수로 연도를 재귀 적으로 인쇄하려면 어떻게해야합니까?

좋아, 그래서 나는 내 텍스트 파일에서 한 줄당 평균 숫자로 연도를 인쇄하는 방법을 알아 내려고 이틀 동안이 골칫거리에 접근했습니다. 며칠 전에 비슷한 질문을했는데 기본적으로 같은 질문을 했습니다. 줄당 총 요소의 평균 값과 함께 텍스트 파일에서 줄을 재귀 적으로 인쇄하려면 어떻게해야합니까?

계속됩니다. 그러나 몇 가지 기능을 만들었습니다. 자, 여기 내 새로운 질문이 있습니다. 내 프로그램의 출력이 아래 그림과 같은 이유는 무엇입니까? 내 코드에서 몇 가지 질문을 주석 처리했습니다. 나는 다음과 같은 출력을 기대하고 있었다.

2010: 3.5788888
2009: 4.697858
This list goes on recursively.

업데이트 된 코드는 다음과 같습니다.

let ReadFile filename =
  [ for line in System.IO.File.ReadLines(filename) -> line ]

let ParseLine (line:string) =
  let strings = line.Split('\t')
  let strlist = Array.toList(strings)
  let year = System.Int32.Parse(strlist.Head)
  let values = List.map System.Double.Parse strlist.Tail
  (year, values)

let rec print (year, values) =
  if values = [] then
    ()
  else
    printfn "%A: %A" year values.Head 
    print (year, values.Tail)

let avg (values:double list) = //this function can compute the average, but it wont work when I do in main, print(firstYear, avg (firstYear1))
    let rec sum values accum =
        match values with
        |  [] -> accum
        |  head :: tail -> sum tail (accum + head/12.0)
    sum values 0.0

let rec sum (year, values:double list) = 
  if values = [] then
    0.0
  else
    values.Head + sum (year, values.Tail)

[<EntryPoint>]
let main argv =
  // read entire file as list of strings:
  let file = ReadFile "rainfall-midway.txt"

  printfn "** Rainfall Analysis Program **"
  printfn ""

  // let's parse first line into tuple (year, list of rainfall values),
  // and then print for debugging:
  let (year, values) = ParseLine file.Head
  let firstYear = file.Head
  let firstYear1 = file.Tail

  //let data = List.map ParseLine file //I know map would be the key, but how does this work with year and its elements?
  //let firstYear = data.Head

  //let firstYear = data.Head
  //print firstYear

  print (firstYear, firstYear1)
  //let S = sum firstYear
  //printfn "%A" S

  //let A = S / 12.0
  //printfn "%A" A

  // done:
  printfn ""
  printfn ""
  0 // return 0 => success