Update CalculatePressuresComponent.R