added last R chart