Update seoul_subway2.R