亚洲在线久爱草,狠狠天天香蕉网,天天搞日日干久草,伊人亚洲日本欧美

為了賬號安全,請及時綁定郵箱和手機立即綁定
已解決430363個問題,去搜搜看,總會有你想問的

dplyr mutate rowSums計算或自定義函數

dplyr mutate rowSums計算或自定義函數

慕運維8079593 2019-11-29 10:19:40
我正在嘗試從行計算中突變一個新變量,rowSums如下所示iris %>%   mutate_(sumVar =             iris %>%             select(Sepal.Length:Petal.Width) %>%            rowSums)結果是“ sumVar”被截斷為其第一個值(10.2):Source: local data frame [150 x 6]Groups: <by row>   Sepal.Length Sepal.Width Petal.Length Petal.Width Species sumVar1           5.1         3.5          1.4         0.2  setosa   10.22           4.9         3.0          1.4         0.2  setosa   10.23           4.7         3.2          1.3         0.2  setosa   10.24           4.6         3.1          1.5         0.2  setosa   10.25           5.0         3.6          1.4         0.2  setosa   10.26           5.4         3.9          1.7         0.4  setosa   10.2..Warning message:Truncating vector to length 1 應該rowwise應用嗎?或在這類計算中使用的正確動詞是什么。編輯:更具體地說,有什么方法可以用實現內聯自定義功能dplyr嗎?我想知道是否有可能做類似的事情:iris %>%   mutate(sumVar = colsum_function(Sepal.Length:Petal.Width))
查看完整描述

3 回答

?
不負相思意

TA貢獻1777條經驗 獲得超10個贊

這更多是一種解決方法,但可以使用


iris %>% mutate(sumVar = rowSums(.[1:4]))

如注釋中所寫,您還可以使用selectmutate內部來獲取要匯總的列,例如


iris %>% 

  mutate(sumVar = rowSums(select(., contains("Sepal")))) %>% 

  head 

要么


iris %>% 

  mutate(sumVar = select(., contains("Sepal")) %>% rowSums()) %>% 

  head


查看完整回答
反對 回復 2019-11-29
?
當年話下

TA貢獻1890條經驗 獲得超9個贊

我正在使用這個簡單的解決方案,它是對Davide Passaretti的回答的更強大的修改:


iris %>% select(Sepal.Length:Petal.Width) %>%

  transmute(sumVar = rowSums(.)) %>% bind_cols(iris, .)

(但是,這需要定義的行順序,這應該很好,除非您可能使用遠程數據集。)


查看完整回答
反對 回復 2019-11-29
?
藍山帝景

TA貢獻1843條經驗 獲得超7個贊

您也可以使用grep代替containsor matches,以防萬一您需要熟悉正則表達式(matches根據我的經驗,這似乎不太像否定的前瞻之類)。


iris %>% mutate(sumVar = rowSums(select(., grep("Sepal", names(.)))))


查看完整回答
反對 回復 2019-11-29
  • 3 回答
  • 0 關注
  • 1254 瀏覽

添加回答

舉報

0/150
提交
取消
微信客服

購課補貼
聯系客服咨詢優惠詳情

幫助反饋 APP下載

慕課網APP
您的移動學習伙伴

公眾號

掃描二維碼
關注慕課網微信公眾號