Python調(diào)用R代碼

import pandas as pd
import rpy2.robjects as robjects
#pandas和r中的dataframe類型轉(zhuǎn)換需要用到pandas2ri  
from rpy2.robjects import pandas2ri   

pandas2ri.activate()
robjects.r(''''' 
     library(dplyr)  # 導(dǎo)入包測試
     ''')  

caculate = robjects.r(''''' 
       f <- function(dat, fun){
              x = dat[,1]
              y = dat[,2]
              if(fun=='add'){
                result = x+y
              }
              if (fun=='division'){
                result = x/y
              }
              return(result)
       } 
       ''')   # 自定義函數(shù)
#通過pandas2ri.py2ri將pandas的dataframe轉(zhuǎn)成r作為輸入爷辱,再使用pandas2ri.ri2py將輸出的r中的dataframe轉(zhuǎn)成pandas          
dat = pd.DataFrame({'x':[1,2,3], 'y':[2,2,2]})
result = pandas2ri.ri2py((caculate(pandas2ri.py2ri(dat), "add")))  # [3, 4, 5]
result = pandas2ri.ri2py((caculate(pandas2ri.py2ri(dat), "division")))  # [0.5, 1. , 1.5]
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請聯(lián)系作者
  • 序言:七十年代末渔呵,一起剝皮案震驚了整個濱河市,隨后出現(xiàn)的幾起案子悦陋,更是在濱河造成了極大的恐慌功偿,老刑警劉巖,帶你破解...
    沈念sama閱讀 221,635評論 6 515
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件,死亡現(xiàn)場離奇詭異,居然都是意外死亡醒陆,警方通過查閱死者的電腦和手機,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 94,543評論 3 399
  • 文/潘曉璐 我一進店門叔汁,熙熙樓的掌柜王于貴愁眉苦臉地迎上來,“玉大人,你說我怎么就攤上這事据块÷肓冢” “怎么了?”我有些...
    開封第一講書人閱讀 168,083評論 0 360
  • 文/不壞的土叔 我叫張陵另假,是天一觀的道長像屋。 經(jīng)常有香客問我,道長边篮,這世上最難降的妖魔是什么己莺? 我笑而不...
    開封第一講書人閱讀 59,640評論 1 296
  • 正文 為了忘掉前任,我火速辦了婚禮戈轿,結(jié)果婚禮上凌受,老公的妹妹穿的比我還像新娘。我一直安慰自己思杯,他們只是感情好胜蛉,可當我...
    茶點故事閱讀 68,640評論 6 397
  • 文/花漫 我一把揭開白布。 她就那樣靜靜地躺著色乾,像睡著了一般誊册。 火紅的嫁衣襯著肌膚如雪。 梳的紋絲不亂的頭發(fā)上暖璧,一...
    開封第一講書人閱讀 52,262評論 1 308
  • 那天案怯,我揣著相機與錄音,去河邊找鬼澎办。 笑死嘲碱,一個胖子當著我的面吹牛,可吹牛的內(nèi)容都是我干的浮驳。 我是一名探鬼主播悍汛,決...
    沈念sama閱讀 40,833評論 3 421
  • 文/蒼蘭香墨 我猛地睜開眼,長吁一口氣:“原來是場噩夢啊……” “哼至会!你這毒婦竟也來了离咐?” 一聲冷哼從身側(cè)響起,我...
    開封第一講書人閱讀 39,736評論 0 276
  • 序言:老撾萬榮一對情侶失蹤奉件,失蹤者是張志新(化名)和其女友劉穎宵蛀,沒想到半個月后,有當?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體县貌,經(jīng)...
    沈念sama閱讀 46,280評論 1 319
  • 正文 獨居荒郊野嶺守林人離奇死亡术陶,尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點故事閱讀 38,369評論 3 340
  • 正文 我和宋清朗相戀三年,在試婚紗的時候發(fā)現(xiàn)自己被綠了煤痕。 大學時的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片梧宫。...
    茶點故事閱讀 40,503評論 1 352
  • 序言:一個原本活蹦亂跳的男人離奇死亡接谨,死狀恐怖,靈堂內(nèi)的尸體忽然破棺而出塘匣,到底是詐尸還是另有隱情脓豪,我是刑警寧澤,帶...
    沈念sama閱讀 36,185評論 5 350
  • 正文 年R本政府宣布忌卤,位于F島的核電站扫夜,受9級特大地震影響,放射性物質(zhì)發(fā)生泄漏驰徊。R本人自食惡果不足惜笤闯,卻給世界環(huán)境...
    茶點故事閱讀 41,870評論 3 333
  • 文/蒙蒙 一、第九天 我趴在偏房一處隱蔽的房頂上張望棍厂。 院中可真熱鬧颗味,春花似錦、人聲如沸勋桶。這莊子的主人今日做“春日...
    開封第一講書人閱讀 32,340評論 0 24
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽例驹。三九已至捐韩,卻和暖如春,著一層夾襖步出監(jiān)牢的瞬間鹃锈,已是汗流浹背荤胁。 一陣腳步聲響...
    開封第一講書人閱讀 33,460評論 1 272
  • 我被黑心中介騙來泰國打工, 沒想到剛下飛機就差點兒被人妖公主榨干…… 1. 我叫王不留屎债,地道東北人仅政。 一個月前我還...
    沈念sama閱讀 48,909評論 3 376
  • 正文 我出身青樓,卻偏偏與公主長得像盆驹,于是被迫代替她去往敵國和親圆丹。 傳聞我的和親對象是個殘疾皇子,可洞房花燭夜當晚...
    茶點故事閱讀 45,512評論 2 359

推薦閱讀更多精彩內(nèi)容