Keiichi Endo endoke1

## gist:dd2d2f719940adbc35ceaf4ed5ffd58a
# 2012/12/14
# 実装をシンプルに
# vcdパッケージがあればCramer's Vを出力
# summary.CrossTableにlatexオプション（ただし表組み部分のみ）

# 2012/05/15 罫線を修正

crossTable <- function(..., deparse.level = 2){
  table <- table(..., deparse.level = deparse.level)
  class(table) <- c("CrossTable", "table")

## Hadoopコマンド ls
hadoop fs -ls

## ObjCのメモ
NSString *str = @"Hello, world!";

## gist:9925606
test
	# 2012/12/14
	# 実装をシンプルに
	# vcdパッケージがあればCramer's Vを出力
	# summary.CrossTableにlatexオプション（ただし表組み部分のみ）

	# 2012/05/15 罫線を修正

	crossTable <- function(..., deparse.level = 2){
	table <- table(..., deparse.level = deparse.level)
	class(table) <- c("CrossTable", "table")