R什麼是轉換多個變量的最佳方式？

我一直在改變我的數據變量可能比我應該更難一點。什麼是更有效的變換批處理變量的方法？例如：R什麼是轉換多個變量的最佳方式？

log_vw = log(msft$vwretd) 
log_ew = log(msft$ewretd) 
log_sp = log(msft$sprtrn) 
log_msft = log(msft$msft) 

msft["log_vw"] <- log_vw 
msft["log_ew"] <- log_ew 
msft["log_sp"] <- log_sp 
msft["log_msft"] <- log_msft 
head(msft)

我用這個方法試過，但我一路上收到了一些錯誤..

cols <- c("msft$vwretd","msft$ewretd","msft$sprtrn","msft$msft") 
df[cols] <- log(cols)

在最後這個例子中，我試圖把非數字參數在數學函數中，這是有道理的。

我明白對於聲明是恰當的陳述，但我不確定如何構造我的命令。

任何建議，將不勝感激。謝謝。

來源

2016-07-27 Starbucks

看看'lapply' – dayne

沒錯@dayne是正確的，你可以試試'的cols < - C（「vwretd」，「ewretd」，「sprtrn」，「MSFT」）; msft [cols] < - lapply（msft [cols]，log）' – thelatemail

如果你是dplyr球迷，你也可以做，

dplyr::mutate_each(msft, funs(log), 
        log_vw = vwretd, 
        log_ew = ewretd, 
        log_sp = sprtrn, 
        log_msft = msft)

輸出：

library(dplyr) 

data.frame(vwretd = runif(10), ewretd = runif(10), sprtrn = runif(10), msft = runif(10)) %>% 
    mutate_each(funs(log), log_vw = vwretd, log_ew = ewretd, log_sp = sprtrn, log_msft = msft) 

     vwretd ewretd  sprtrn  msft  log_vw  log_ew  log_sp log_msft 
1 0.54274693 0.1263857 0.88601706 0.458666312 -0.6111121 -2.06841664 -0.1210191 -0.7794323 
2 0.44335175 0.5799405 0.05000435 0.004620247 -0.8133918 -0.54482978 -2.9956452 -5.3773070 
3 0.10626751 0.6079891 0.77995001 0.474660813 -2.2417957 -0.49759827 -0.2485255 -0.7451548 
4 0.56562366 0.7637879 0.03525097 0.199729556 -0.5698263 -0.26946509 -3.3452623 -1.6107910 
5 0.39274678 0.7384458 0.62834120 0.888230976 -0.9345902 -0.30320757 -0.4646719 -0.1185235 
6 0.04751128 0.5708233 0.53730398 0.425984998 -3.0467881 -0.56067550 -0.6211913 -0.8533511 
7 0.57159055 0.9290444 0.31881544 0.679257606 -0.5593324 -0.07359875 -1.1431429 -0.3867548 
8 0.10841133 0.9730511 0.26677617 0.097040692 -2.2218227 -0.02731870 -1.3213453 -2.3326249 
9 0.17500813 0.3787455 0.14860983 0.480663703 -1.7429229 -0.97089076 -1.9064310 -0.7325874 
10 0.89509921 0.4091091 0.79529002 0.681128521 -0.1108207 -0.89377335 -0.2290484 -0.3840043

來源

2016-07-27 01:09:22

我正在安裝dplyr。感謝您的指導。 – Starbucks

'mutate_each'將被棄用。使用mutate_all或mutate_at代替 – Sumedh

有趣。感謝通知！ –

謝謝@ dayne和@thelatemail。這就是我需要的。謝謝。

cols <- c("vwretd","ewretd","sprtrn","msft") 
msft[cols] <- lapply(msft[cols], log)

來源

2016-07-27 00:39:15 Starbucks

這裏是data.table一個選項。將'data.frame'轉換爲'data.table'（setDT(msft)），指定.SDcols中的'cols'，遍歷Data.table的子集（.SD），獲取log並將輸出分配給（:=）列（paste0("log_",cols)）。

library(data.table) 
cols <- c("vwretd","ewretd","sprtrn","msft") 
setDT(msft)[, paste0("log_", cols) := lapply(.SD, log), .SDcols = cols]

來源

2016-07-27 03:17:38 akrun

R什麼是轉換多個變量的最佳方式？

回答

相關問題