R fix hopefully