Add r datatype