Rからawkを使う

ちょっと何を言ってるのかわからないと思うけどメモ。
Kmiscパッケージで使える。
awkという名前ではないawkgawkとかmawkとか)を使っている場合はawk.setでそれを指定しておく。

library(Kmisc)
dat <- data.frame(
  x=1:10,
  y=letters[1:10],
  z=LETTERS[1:10]
)

tempfile <- tempfile()

write.table(dat,
  file=tempfile,
  row.names=FALSE,
  col.names=FALSE,
  quote=FALSE
)
awk.set("gawk")
x <- awk("print $1", tempfile)

cygwin使っててcygwin warning:なんたらかんたらと出る場合はCYGWIN環境変数にnodosfilewarningを入れておけば良い。
下記参照のこと
http://takuya-1st.hatenablog.jp/entry/20110423/1303586388