adding R data attempts
q