Test data giving negative R sq

For your second question, see this answer.