Update NaiveLongSystem.R