update text.R