r语言for循环例题