Update SomeFunctions.r