第四讲-程序设计PPT课件.ppt

作用域 函数的虚参完全是按值传递的，改变虚参的值不能改变对应实参的值。例如： x = c(1, abc) x [1] 1 “abc f =function(x) {x[2] - !! ;x} f(x) [1] 1 !! x [1] 1 “abc 这个例子说明了函数体内部的变量是局部的，赋值只针对函数体的变量，一旦函数运行结束以后，不改变全局变量的值。 * 函数体内的变量也是局部的，对函数体内的变量赋值当函数结束运行后变量值就删除了，不影响原来同名变量的值。例如： x - 2 f - function() {print(x) ; x= 20 } f() [1] 2 x [1] 2 这个例子中原来有一个变量x值为2，函数中为变量x赋值20，但函数运行完后原来的x值并未变化。但是也要注意，函数中的显示函数调用时局部变量x还没有赋值，显示的是全局变量x 的值。这是R编程比较容易出问题的地方：你用到了一个局部变量的值，你没有意识到这个局部变量还没有赋值，而程序却没有出错，因为这个变量已有全局定义。 * R程序设计注意要点 对于复杂一些的计算问题我们应该编写成函数。这样做的好处是 编写一次可以重复使用，并且可以很容易地修改 函数内的变量名是局部的，运行函数不会使函数内的局部变量被保存到当前的工作空间，可以避免在交互状态下直接赋值定义很多变量使得工作空间杂乱无章。 * 编写函数是要注意： 可读性(readability). 可理解性(understandability). 具体要做到： 采用结构化、模块化编程； 增加必要的注释； 使用意义明确的名字作为变量名，切忌用人名或者宠物名； 行前缩进，使程序有层次感。 * 工作空间管理 R在运行时保持一个变量有哪些信誉好的足球投注网站路径表，要读取某变量时依次在此路径表中查找，返回找到的第一个；给变量赋值时在有哪些信誉好的足球投注网站路径的第一个位置赋值。但是，在函数内部，有哪些信誉好的足球投注网站路径表第一个位置是局部变量名空间，所以变量赋值是局部赋值，被赋值的变量只在函数运行期间有效。 用ls()函数可以查看当前工作空间保存的变量和函数，用rm()函数可以剔除不想要的对象。如： ls()（或objects()） * [1] A Ai b cl cl.f fit1 g1 marks ns [10] p1 rec tmp.x x x1 x2 x3 y rm(x, x1, x2, x3) ls() [1] A Ai b cl cl.f fit1 g1 marks ns [10] p1 rec tmp.x y ls()可以指定一个pattern参数，此参数定义一个匹配模式，只返回符合模式的对象名。模式格式是UNIX中grep的格式。比如，ls(pattern=tmp[.])可以返回所有以“tmp.” 开头的对象名。 rm()可以指定一个名为list的参数给出要删除的对象名，所以rm(list=ls(pattern=“tmp[.]”)) 可以删除所有以“tmp.”开头的对象名。 rm(list=ls()) 删除所有对象。 * 程序设计举例 设计R程序是很容易的，在初学时我们只要使用我们从一般程序设计中学来的知识并充分利用R中现成的各种算法及绘图函数就可以了。但是，如果要用R编制计算量较大的程序，或者程序需要发表，就需要注意R程序设计的一些技巧。 用R语言开发算法，最重要的一点是要记住R是一个向量语言，计算应该尽量通过向量、矩阵运算来进行，或者使用R提供的现成的函数，避免使用显式循环。显式循环会大大降低R的运算速度，因为R是解释执行的。 * n=1:10; x=sin(n*pi/10); cat(x=,x) [1] x= 0.309017 0.5877853 0.809017 0.9510565 1 0.9510565 0.809017 0.5877853 0.309017 1.224606e-16 fsin - function(x){ sin - 0; for ( i in 1:length(x)) { sin[i] - sin(x[i]*pi/10); } return(sin); } y - 1:10; fsin(y); [1] 3.090170e-01 5.877853e-01 8.090170e-01 9.510565e-01 1.000000e+00 [6] 9.510565e-01 8.090170e-01 5.877853e-01 3.090170e-01 1.22