Create cahematrx.R