change r to just do cat