A Framework to Model and Control the State of Presence in Virtual Reality Systems