Update Location.R