Create ishikawa.R