LoginSignup
10
7

More than 3 years have passed since last update.

F#Advent Calendar 2020Day 3
@adacolain有限会社来栖川電算

.NET Interactive NotebooksとF#の相性はバツグンだ！

Posted at

この記事は F# Advent Calendar 2020 の3日目の記事です。

.NET Interactive Notebooks とは

乱暴な言い方をすると、 Jupyter Notebooks の .NET 版を Visual Studio Code で使う拡張機能となります。

ノートブック内では F#、C#、Powershell といった.NET言語を使ったコーディング、その出力結果の可視化、markdown のドキュメントの埋め込みが可能です。

動作環境

本記事は以下の環境で動作確認した内容に基づいて記載しています。

  • Windows10 Pro 20H2
  • Visual Studio Code 1.52.0 - Insider

なお、同環境上のWSL2(Ubuntu 18.04)でも以前動作させた実績があります。

準備

.NET Interactive Notebooks は現在 Visual Studio Code Insiders (VSCodeのプレビュー版)でしか使えません。

まずは https://code.visualstudio.com/insiders/ でインストーラーもしくはパッケージをダウンロードして VSCode Insiders をインストールします。
Windows版、Mac版、Linux版が用意されています。
2020-12-03-08-44-26.png

次に VSCode Insiders を開き、拡張機能で適当に notebooks などで検索すると出てくる .NET Interactive Notebooks をインストールします。
2020-12-03-08-45-33.png

これで .NET Interactive Notebooks はインストールできましたが、F# でのコーディングをするので Ionide-fsharp もインストールしておくとよいでしょう。
fsharp などで検索すると出てきます。
(Ionide-fsharp が依存している C#拡張もインストールが必要になります)
2020-12-03-08-51-29.png

Hello World!

とりあえずお約束の Hello World! を表示させてみましょう。

コマンドパレット(Ctrl+Shift+P)から .NET Interactive: Create new blank notebook を選択します。
2020-12-03-16-53-55.png

すると拡張子が .ipynb のドキュメントが新規作成されます。 .ipynb は Jupyter Notebooks のファイルの拡張子です。
2020-12-03-08-46-29.png

ノートブックの先頭にある空のエディタ部分にコードやドキュメントを書いていくことになります。
今回は F# でコーディングをしたいので、エディタ部分の右下の言語選択を C# から F# に変更します。
2020-12-03-09-15-34.png
2020-12-03-09-19-42.png

エディタ部分に F# のコードを書いて「Alt + Enter」を入力すると、コードが実行されて結果の値がエディタの下に出力され、新たなエディタセルが追加されます。
(なお、「Ctrl + Enter to run」と書かれていますが、私の環境では「Alt + Enter」で実行でした)
printf などの出力関数を使わなくても、一連のコードの最終的な結果の値が自動的に表示されます。
2020-12-03-09-40-43.png

markdownドキュメントの埋め込み

ノートブックにドキュメントやコメント的なmarkdown文書を埋め込むこともできます。
言語選択でmarkdownを選択し、エディタセルの中に普通にmarkdownを記述して同じく「Alt + Enter」を入力するとmarkdownが確定されてリッチテキストとして表示されます。
markdown記述中にもプレビューウィンドウを開いて見栄えを確認することも可能です。
2020-12-03-09-43-49.png
2020-12-03-09-46-02.png

パッケージやスクリプトファイルの読み込み

F# Advent Calendar 1日目の記事 にもある通り、F#5.0からはF#スクリプトの #r ディレクティブでNuGet上のパッケージを直接読み込むことが可能となりました。
.NET Interactive Notebooks でもこの機能に対応しています。
2020-12-03-11-18-31.png
ちなみに、上記の例のように構造化された値を出力する際には見やすいように表形式で出力してくれます。
同様に #load ディレクティブを使用して他のF#スクリプトファイルを読み込んで、そのスクリプトファイル内で定義された関数やモジュールを呼び出すことも可能です。

グラフの描画

.NET Interactive Notebooks では XPlot の Plotly によるグラフ表示をサポートしています。

例として、Spotifyから日本で先週1週間で再生数トップ200の曲のテンポをヒストグラムとして表示してみました。
以下のサイトのデータおよびパッケージを使用しています。

#r "nuget: FSharp.Data"
#r "nuget: XPlot.Plotly"
#r "nuget: SpotifyAPI.Web"

open FSharp.Data
open XPlot.Plotly
open SpotifyAPI.Web
open System

type TopMusicCsv = CsvProvider<"regional-jp-weekly-latest.csv">
let topMusicCsv = TopMusicCsv.GetSample()
let topMusicIds = topMusicCsv.Rows |> Seq.map (fun r -> Uri(r.URL).Segments |> Seq.last)

let config =
  SpotifyClientConfig.CreateDefault()
  .WithAuthenticator(ClientCredentialsAuthenticator("<client id>", "<client secret>"))
let spotify = SpotifyClient(config)
let tempos =
  topMusicIds |> Seq.map (fun musicId -> async {
    let! resultAsync = spotify.Tracks.GetAudioFeatures musicId |> Async.AwaitTask |> Async.StartChild
    do! Async.Sleep 500
    let! result = resultAsync
    return result.Tempo
  }) |> Async.Sequential |> Async.RunSynchronously

let layout = Layout(title = "Japan Top 200 Musics", xaxis = Xaxis(title = "tempo"))
Histogram(x = tempos, xbins = Xbins(size = 5))
|> Chart.Plot
|> Chart.WithLayout layout
|> Chart.WithWidth 700
|> Chart.WithHeight 500

2020-12-03-15-35-14.png

画像の表示

ビルトインの display 関数を使うことでHTMLを表示することが可能なことを利用して、 img タグに画像のデータを埋め込んで表示させることができます。
画像ファイルを表示する関数と、OpenCVの Mat を表示する関数の両方を実装してみました。

#r "nuget: OpenCVSharp4"
#r "nuget: OpenCvSharp4.runtime.win"

open OpenCvSharp
open OpenCvSharp.Extensions
open System
open System.IO
open System.Drawing.Imaging

let displayBase64 (mime: string) (base64String: string) =
  let url = $"data:{mime};base64,{base64String}"
  display(HTML($"""<img src="{url}" />"""))

let displayImageFile (file: string) =
  let ext = Path.GetExtension(file).ToLower()
  let mime = match ext with ".jpg" | ".jpeg" -> "image/jpeg" | ".png" -> "image/png" | ".gif" -> "image/gif" | other -> failwith $"{other} is not supported."
  let bytes = File.ReadAllBytes(file)
  let base64String = Convert.ToBase64String(bytes)
  displayBase64 mime base64String

let displayMat (mat: Mat) =
  use bitmap = mat.ToBitmap()
  use stream = new MemoryStream()
  bitmap.Save(stream, ImageFormat.Jpeg)
  let base64String = Convert.ToBase64String(stream.ToArray())
  displayBase64 "image/jpeg" base64String

displayMat 関数を使用してOpenCVの Mat を表示してみた例です。
これでOpenCVを使用した画像加工後に加工後の画像を表示して確認が可能になります。
2020-12-03-16-37-13.png

まとめ

.NET Interactive Notebooks を使うことでデータの加工および表示をアドホックに行うことができます。

F# には FSharp.Data のような強力なデータ加工用パッケージが存在しており、静的型付けや Units of Measure などと組み合わせて、お手軽さ・堅牢さ・強力さ・高速さを兼ね備えた各種データ処理が可能です。

ぜひこの機会に .NET Interactive Notebooks を使用した快適なスクリプティングを！

10
7
0

Register as a new user and use Qiita more conveniently

  1. You get articles that match your needs
  2. You can efficiently read back useful information
  3. You can use dark theme
What you can do with signing up
Sign upLogin
10
7