Update Singapore.R