Update top50.R