f# - 可从 F# 中的序列观察

Question

有没有办法从 F# 中的序列创建一个 observable？

所需的行为是订阅结果 observable 的观察者一次接收序列的所有值。

编辑 : 问题可以表述为: 是否有等价于 Rx.Observable.FromArray([1,2,3])如图 here在 F# 中？

编辑 2 : 谢谢大家。我花了一些时间才找到答案，才发现desco已经回答了。为了完整起见，这里是它的工作原理:

//Using the Reactive Framework.
//References to System.CoreEx.dll and System.Reactive.dll are needed.

open System.Linq

let observable = Observable.ToObservable [1..10]
let odds = observable |> Observable.filter (fun i -> i%2=1)
let disp = odds.Subscribe (fun i -> printfn "%d" i)
disp.Dispose ()

Answer 1

以防万一您想避免额外的依赖项，实际上使用 F# 事件和 Observable.guard 实现该行为非常容易。我已经在 another answer here at StackOverflow 中使用的功能.

下面是一个简单的例子的实现:

module Observable = 
  let ofSeq s = 
    let evt = new Event<_>()
    evt.Publish |> Observable.guard (fun o ->
      for n in s do evt.Trigger(n))

[ 1 .. 10 ] |> Observable.ofSeq
            |> Observable.filter (fun n -> n%2 = 0)
            |> Observable.add (printfn "%d")

并且为了完整性，实现 Observable.guard看起来像这样:

/// Creates an observable that calls the specified function after someone
/// subscribes to it (useful for waiting using 'let!' when we need to start
/// operation after 'let!' attaches handler)
let guard f (e:IObservable<'Args>) =  
  { new IObservable<'Args> with  
      member x.Subscribe(observer) =  
        let rm = e.Subscribe(observer) in f(); rm }