［R］cwevent.exeの出力フィールドのヘッダー一覧をベクトルで得る

cwevent.exeの出力するフィールド情報は、以下のページで公開されている。

https://chadwick.sourceforge.net/doc/cwevent.html

このページ内の表にそれぞれ標準フィールド（全97個）と拡張フィールド（62個）が示されており、rvestパッケージのread_html関数とhtml_table関数を使うことで、それぞれのフィールドのヘッダーを、文字列ベクトルで簡単に抜き出すことができる。

> library(rvest)
> html <- read_html("https://chadwick.sourceforge.net/doc/cwevent.html")
> tbl <- html_table(html, header = NA)
> s1 <- tbl[[1]]$Header
> s2 <- tbl[[2]]$Header
> print(s1)
 [1] "GAME_ID"                   "AWAY_TEAM_ID"             
 [3] "INN_CT"                    "BAT_HOME_ID"              
 [5] "OUTS_CT"                   "BALLS_CT"                 
（以下、表示省略）
> print(s2)
 [1] "HOME_TEAM_ID"           "BAT_TEAM_ID"           
 [3] "FLD_TEAM_ID"            "BAT_LAST_ID"           
 [5] "INN_NEW_FL"             "INN_END_FL"            
（以下、表示省略）