1

我有以下问题,希望有人可以帮助我。

问题的简短描述:我需要将(字符串 A,浮点 B,浮点 C)三元组存储到合适的容器中。三元组起源于双“for”循环。但要点是,当循环结束时,我需要对这个容器进行切片以执行其他操作。

下面是一个可以从 .fsx shell(使用 Deedle 帧)执行的示例。三合会是在屏幕上打印的内容。

open Deedle

let categorical_variable = [| "A"; "B"; "C"; "A"; "B"; "C"; |]
let vec_1 = [| 15.5; 14.3; 15.5; 14.3; 15.5; 14.3; |]
let vec_2 = [| 114.3; 17.5; 9.3; 88.7; 115.5; 12.3; |]

let dframe = frame ["cat" =?> Series.ofValues categorical_variable
                    "v1" =?> Series.ofValues vec_1
                    "v2" =?> Series.ofValues vec_2 ]

let distinct_categorical_variables = categorical_variable |> Array.toSeq |> Seq.distinct |> Seq.toArray

let mutable frame_slice : Frame<int, string> = Frame.ofRows []
let mutable frame_slice_vec_1 : float[] = Array.empty
let mutable frame_slice_vec_1_distinct : float[] = Array.empty

for cat_var in distinct_categorical_variables do

    frame_slice <- (dframe |> Frame.filterRowValues (fun row -> row.GetAs "cat" = cat_var))
    frame_slice_vec_1 <- (frame_slice?v1).Values |> Seq.toArray
    frame_slice_vec_1_distinct <- (frame_slice_vec_1 |> Array.toSeq |> Seq.distinct |> Seq.toArray)

    for vec_1_iter in frame_slice_vec_1_distinct do

        printfn "%s, %f, %f \n"  cat_var vec_1_iter (Array.average ((frame_slice?v2).Values |> Seq.toArray) ) |> ignore

那么,有没有合适的对象来存储这个三元组呢?我看到了 Array3d 对象,但我认为它们不是正确的解决方案,因为我的三合会的 A、B 和 C 具有不同的类型。

提前谢谢了。

4

1 回答 1

2

你可能想要一个带有元组的序列表达式

let mySequence = 
  seq { for cat_var in distinct_categorical_variables do
          ...
          for vec_1_iter in ... do
            yield cat_var, vec_1_iter, Array.average ... }

// then use it like
for cat_var, vec_1_iter, result in mySequence do
  ...
于 2015-05-09T12:59:41.503 回答