Different way of calculating r2, no speedup because of additional read