Create datacat.R

R Code to make cat data