Added making long format from crosstab.
changed written csv to data frame of crosstab (long format)