Update interact.R