Update test.r

Add a second line.