VR(P)