R简单操作code.R