LectureN因子、列表、数据框及输入输出.pptVIP

为了输出这三个日期，可以用apply函数指定对每一行作用一个输出函数，此输出函数利用cat()和formatC来控制： apply(da, 1, function(r) cat(formatC(r[1], format=d, width=2, flag=0), -, formatC(r[2], format=d, width=2, flag=0), -, formatC(r[3], format=d, width=2, flag=0), \n, sep=)) 99-01-03 96-11-09 65-05-18 NULL 这里我们知道apply函数第一个参数指定了一个矩阵，第二个参数说明对行操作还是对列操作，第三个参数是一个函数，这里我们使用了直接定义一个函数作为参数的办法。输出结果中多了一个NULL函数，这是因为我们在交互运行，apply的结果作为一个表达式的值（NULL ）会被显示出来。 为避免显示，可以把结果赋给一个临时变量名，或者把整个表达式作为invisible() 函数的参数，这时不显示表达式值。 S的输出缺省显示在交互窗口。可以用sink()函数指定一个文件以把后续的输出转向到这个文件，并可用append参数指定是否要在文件末尾附加： sink(“E:/work/result.txt, append=TRUE) ls() d sink()