Rcpp快速入门_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
Rcpp快速入门
上传于||文档简介
&&R​ ​数​据​挖​掘​ ​数​据​分​析
阅读已结束，如果下载本文需要使用2下载券
想免费下载本文？
定制HR最喜欢的简历
下载文档到电脑，查找使用更方便
还剩26页未读，继续阅读
定制HR最喜欢的简历
你可能喜欢请问在R语言中自编函数怎么用？？_r语言吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：8,461贴子：
请问在R语言中自编函数怎么用？？收藏
自编检验典型相关系数的函数，怎么用呢？是不是需要先把函数保存到R中，还是直接打入到窗口直接用？我怎么做都是错的，求大家帮帮忙吧！！[PERSON WITH FOLDED HANDS][PERSON WITH FOLDED HANDS]
高品质西班牙语言学校机构,全西班牙外教教学,不一样的西班牙课程体验,完整西班牙教学体系,西班牙语言学校0元免费课程试听,满意再入学!西班牙语言学校免费咨询中心:400-88..
1.自编函数保存在r的工作目录下，然后用函数source(&文件名.R&)调用，接着写函数名（变量）就可以用了2.自编函数保存在一地方，source（“地址／文件名.R”）,接着函数名（变量）不知道我说清楚了没有。。。
登录百度帐号推荐应用
为兴趣而生，贴吧更懂你。或主题：使用Rcpp.package.skeleton创建包，安装之后函数不能使用问题（RStudio环境）） | COS论坛 | 统计之都[转载]python中调用R
需要在python中调用R，实在是一种无奈的选择。如果能在一门语言中独立完成课题，是一个比较理想的做法。但是，这种想法也不太现实，毕竟每一种语言都有自己的长处。如果能取长补短，综合使用各种语言，也能起到不错的效果。
现在遇到的问题是，如何在python中调用R？这其中包括了如何调用R的对象（函数和包），R和python的对象如何互相转换，以及如何调用R的脚本（外界参数的输入）。python提供了一个模块rpy2，可以较好地完成这项工作。
1. 安装rpy2
rpy2的网址：
可以使用easy_install安装，# easy_install
注意事项：
1. 如果是源代码编译安装R，需要在configure步骤加入后缀 --enable-R-shlib
2. 需要安装python-devel包
2. python调用R对象
2.1 使用rpy2.robjects包的r对象
调用方法如下，以下robject.r的调用方法实际上是开启了一个R的交互进程，只需要将R的代码写入一个字符串内（注1），接着调用R即可：
==========================
import rpy2.robjects as
==========================
此时，有三种方法调用R对象：
第一种：robjects.r['pi']
第二种：robjects.r('pi')（这种方法从某种程度上讲是万能的，因为可以将任意大小和长度的R代码写成一个python字符串，之后通过robjects.r('Rcode')调用执行。）
第三种：robjects.r.pi（这种方法对于名称中有“点号”的变量会出问题，比如data.frame/read.csv等，所以推荐使用第一种方法）
以下是一个创建和使用R函数（自己创建的函数或者R内置函数）。注意：最后一种方法，对于对付一些特殊的格式很管用：
==========================
# creat an R function
&&& robjects.r(
&f &- function(r){pi *
&&& robjects.r['f'](3)
[9.424778]
# internal function in R
&&& robjects.r['ls']()
# another internal function
&&& l = robjects.r['letters']
&&& len(l)
&&& robjects.r['paste'](l, collapse = '-')
# an alternative way of getting 'paste' function in R
# eval the R code
&&& coder = 'paste(%s, collapse = "-")' %
(l.r_repr())
&&& robjects.r(coder)
==========================
对于一些特殊的R对象比如list和matrix，如果python要调去其中的部分数据，可以通过其rx()和rx2()方法操作。对于list，可以查看其name属性，以获得列表个个元素名称。rx()和相当于"["操作（注意取出的是R的list对象），而rx2()相当于"[["操作。一个例子：
===========================================
&&& tmp = r("list(a = matrix(1:10, nrow = 2), b =
'Hello')")
&&& print tmp
[,2] [,3] [,4] [,5]
[1,] & &1 &
[2,] & &2 &
[1] "Hello"
&&& tmp.names
&StrVector - Python:0x8afdc8c /
R:0x8ce0a70&
['a', 'b']
&&& tmp.rx('a')
&ListVector - Python:0x8afd86c /
R:0x8cf71c0&
& a: &class
'rpy2.robjects.vectors.Matrix'&
& &Matrix - Python:0x8b013cc /
R:0x97de388&
[ & & & 1,
& &3, ..., &
&&& tmp.rx(1)
&ListVector - Python:0x8b010cc /
R:0x8cf7100&
& a: &class
'rpy2.robjects.vectors.Matrix'&
& &Matrix - Python:0x8b017cc /
R:0x97de388&
[ & & & 1,
& &3, ..., &
&&& tmp.rx2(1)
&Matrix - Python:0x8b01b4c /
R:0x97de388&
[ & & & 1,
& &3, ..., &
&&& tmp.rx2('a').rx(1, 1) #
first element of 'a'
&IntVector - Python:0x8b01acc /
R:0x8cf6fa0&
&&& tmp.rx2('a').rx(1, True) #
first row of 'a'
&IntVector - Python:0x8b01f2c /
R:0x965ffd8&
[ & & & 1,
========================================
注意事项：
如果函数有警告（warnings），在ipython等IDE上能够执行，但是如果是脚本或者与网页服务器交互，则会产生错误。解决办法：1.
鲁莽的解决很简单，强行忽略R的警告，options(warn = -1)或者R代码放入函数中suppressWarnings()。2.
第二种办法，如果是自己代码中使用了warning()函数，则将warning信息换成字符串，之后单独输出。
2. 如果R的函数参数用到向量，有两种解决办法：1. 使用robject.**Vector()函数（见下）先将python对象转换成R对象，然后带入函数；2.
直接使用python对象，一个例子：
=======================================
&&& from rpy2.robjects import r
&&& a = r['matrix'](range(10), nrow = 2)
&&& print a
[,2] [,3] [,4] [,5]
[1,] 0 & &2
[2,] 1 & &3
========================================
2.2 python对象转换成R对象
通常，可以将python的list对象，转换成为R的vector对象，之后直接使用R函数调用。相应的函数是robjects.StrVector()/robjects.IntVector()/robjects.FloatVector()/plexVector()/robjects.FactorVector()/robjects.BoolVector()/，这些函数将python列表转化成R的字符/整数/浮点/复数/因子/布尔向量。robjects.ListVector()将python的字典转换成R的列表。
具体转换可见
==================================================
&&& testmatrix = robjects.IntVector([1, 2, 3,
&&& robjects.r['matrix'](testmatrix, nrow = 2)
# another dynamic arguments example
= robjects.IntVector(range(10))
= robjects.r.rnorm(10)
&&&&kwargs
= {'ylab': 'foo/bar', 'type': 'b', 'col': 'blue', 'log':
&&&&robjects.r.plot(*args,
===================================================
注意事项：
1. 使用vector系列函数时，输入的只能是python的列表，而不能是数字或者字符串。
2.3 载入和使用R包
使用rpy2.robjects.packages.importr对象，调用方法是
===================================
&&& from rpy2.robjects.packages import importr
&&& base = importr('base')
&&& stats = importr('stats')
&&& affy = importr('affy')
&&& stats.rnorm(10)
===================================
如果想引用一个包中的隐变量，也很简单，只要载入包，然后所有r命令化成成字符串，之后引用即可（这种方法是万能的），比如
=======================================================================
&&& from rpy2.robjects.packages import importr
&&& importr('hwriter')
&&& a = r('hwriter:::hwrite.table(matrix(1:10,
&&& print(a)
[1] "&table
border="1"&n&tr&n&td&1&/td&&td&3&/td&&td&5&/td&&td&7&/td&&td&9&/td&&/tr&n&tr&n&td&2&/td&&td&4&/td&&td&6&/td&&td&8&/td&&td&10&/td&&/tr&n&/table&n"
=========================================================================
2.4 导入R脚本
使用R的source函数：
========================
from rpy2.robjects import r
r.source('testrscript.r')
=======================
2.5 转换R对象为全局变量
因为使用函数robjects.globalenv()将对象转换成全局变量，特别是遇到python找不到一个R对象时（此时R对象可能通过r('Rcode')调用），留意将R对象转变成全局变量。
3. R对象转换成python对象
推荐使用tuple( )或者list( )函数，将R对象转换成tuple或者list。
==========================================
&&& a = r('c(1, 2, 3)')
&FloatVector - Python:0x904746c /
R:0x9114978&
[1...000000]
&&& str(a)
'[1] 1 2 3n'
&&& tuple(a)
(1.0, 2.0, 3.0)
&&& list(a)
[1.0, 2.0, 3.0]
&&& b = r('matrix(1:6, 2, 3)')
&Matrix - Python:0x9039c6c /
R:0x9114710&
[ & & & 1,
&&& print b
[1,] & &1 &
[2,] & &2 &
&&& tuple(b)
(1, 2, 3, 4, 5, 6)
&&& list(b)
[1, 2, 3, 4, 5, 6]
==========================================
参考文献和注释：
注释1：对于R代码，即便是将一段R代码写成一行（尽管看起来很丑陋而且不推荐），一样可以执行。但是，反过来，对于python代码则没有这么简单。因为，python代码是靠缩进来划分代码的区域，假若一段代码中有两个循环嵌套，如果此时将所有代码写成一行，执行起来就要麻烦的多（很可能要依赖空格的多少进行解释）
以上网友发言只代表其个人观点，不代表新浪网的观点或立场。您所在位置： &
&nbsp&&nbsp&nbsp&&nbsp
Rcpp 快速入门.pdf29页
本文档一共被下载：
次 ,您可免费全文在线阅读后下载本文档
文档加载中...广告还剩秒
需要金币：50 &&
你可能关注的文档：
··········
··········
背景和准备工作 Rcpp 数据类型及操作 as 和 wrap 迭代器和泛型算法 调用 R 中的函数 Rcpp Suga r Rcpp Mo dule, RInside
Rcpp 快速入门
中国科学技术大学统计与金融系
黄金山 中国科学技术大学统计与金融系
Rcpp 快速入门背景和准备工作 Rcpp 数据类型及操作 as 和 wrap 迭代器和泛型算法 调用 R 中的函数 Rcpp Suga r Rcpp Mo dule, RInside
Why and Ho w
R 是解释性的语言 , 所以运行速度比较慢, 尤其是显示循环尽量用 R 提供的向量化运算策略 , 使用 apply 系列函数可以通过借助其他编程语言 C, C++, F o rtran 来提高程序的
运行效率由于 R 本身就是用 C, F o rtran 写的 , 所以 R 提供
C, C++, F o rtran 的各种 API.
R 提供的 C API 对一般人而言很难上手, 而且操作复杂幸
运的是 Rcpp 为我们提供了很方便简单和高效的 C++ API.
你需要一个编译器 , 推荐使用 gcc/g++, windo ws 用户可以
通过安装 Rto ols 获得 ,Linux 一般自带你还需要安装 Rcpp 和 inline 包黄金山 中国科学技术大学统计与金融系
Rcpp 快速入门背景和准备工作 Rcpp 数据类型及操作 as 和 wrap 迭代器和泛型算法 调用 R 中的函数 Rcpp Suga r Rcpp Mo dule, RInside
Rcpp class R t yp eof
IntegerV ecto r|Matrix integer vecto rs and matrices
NumericV ecto r|Matrix numeric.
LogicalV ecto r|Matrix logical.
Cha racterV ecto r|Matrix cha racter.
ComplexV ecto r|Matrix complex.
List list aka generic vecto rs.
Exp ressionV ecto r|Matrix exp ression.
Environment environment
F unction function
XPtr externalptr
Language language
S4 S4黄金山 中国科学技术大学统计与金融系
Rcpp 快速入门背景和准备工作 Rcpp 数据类型及操作 as 和 wrap 迭代器和泛型算法 调用 R 中的函数 Rcpp Suga r Rcpp Mo dule, RInside
RObject 简介
Rcpp 中的基本类型是 RObject, 有点像 C 接口中的 SEXP
在标准的 C 接口中所有的 R 对象都是 SEXP, RObject 实
正在加载中，请稍后...