Update first.R