sapply与自定义函数配合使用
来源:互联网 发布:js eval 替代方法 编辑:程序博客网 时间:2024/06/08 02:08
> a<-matrix(1:12,c(3,4))> a.df<-data.frame(a)
> a.df
X1 X2 X3 X4
1 1 4 7 10
2 2 5 8 11
3 3 6 9 12
> sapply(a.df, function(x,y) x+y+3, y=10) #按列对第一个参数进行function计算,第一个参数a.df是4列,所以结果是4个结果,而且计算结果的列名用原来的列名
X1 X2 X3 X4
[1,] 14 17 20 23
[2,] 15 18 21 24
[3,] 16 19 22 25
> sapply(a.df[,1], function(x,y) x+y+3, y=10) # 第一个参数是一列
[1] 14 15 16
> sapply(a.df[,1:2], function(x,y) x+y+3, y=10) # 第一个参数是2列
X1 X2
[1,] 14 17
[2,] 15 18
[3,] 16 19
> sapply(a.df[,1:2], function(x,y) x+y+3, y=a.df[,4]) #多个参数的函数,都可以传列进去
X1 X2
[1,] 14 17
[2,] 16 19
[3,] 18 21
> sapply(a.df[,1:2], function(x,y,z) x+y+z, y=a.df[,4],z=13) # 多个参数的函数,参数自由
X1 X2
[1,] 24 27
[2,] 26 29
[3,] 28 31
> sapply(a.df[,1:2], function(x,y,z) x+y+z, y=a.df[,4],z=a.df[,3]) # 多个参数的函数,参数自由
X1 X2
[1,] 18 21
[2,] 21 24
[3,] 24 27
> sapply(a.df[,1:2], function(x,y,z) {c(x+y+z, x+y+z+10)}, y=a.df[,4],z=13) #函数输出为多个值时,注意变化!!! 第二个参数按行排列了
X1 X2
[1,] 24 27
[2,] 26 29
[3,] 28 31
[4,] 34 37
[5,] 36 39
[6,] 38 41
0 0
- sapply与自定义函数配合使用
- JSTL自定义函数,配合c标签使用
- 仿函数, 函数适配器,与STL算法的配合使用
- htmlspecialchars()函数 与 nl2br()函数 配合使用实例
- PHP set_error_handler() 函数与 trigger_error() 函数的配合使用
- sapply函数的应用 实例
- android关于ListView与自定义适配器配合使用的步骤与优化
- DataGridView与BindingManagerBase配合使用
- Git与SVN配合使用
- eclipse与hadoop配合使用
- UITabBarController与UINavigationController配合使用
- Maven与Sonar配合使用
- UITabBarController与UINavigationController配合使用
- UITabBarController与UINavigationController配合使用
- UITabBarController与UINavigationController配合使用
- eclipse与cmake配合使用
- fixed与flex配合使用
- gearman 与pcntl配合使用
- AndroidManifest.xml 详解
- 不兼容结构的协调——适配器模式
- AsyncDisplayKit入门指南
- xUtils的Get和Post请求
- atoi和itoa函数的实现方法
- sapply与自定义函数配合使用
- oracle表结构查询
- e.printStackTrace();和e.getMessage();有什么区别
- ZigBee
- 开始啃 Erlang 程序设计,第二口
- USB SCSI协议整个过程简介
- mysql show processlist state
- linux和windows下通信的thrift
- html学习笔记