我在 r 中有一個名為 ipaq_2 的字符列，類似于“02:00”（小時：分鐘）。該列也有一些 NA 值。我需要將此列轉換為顯示分鐘的數字列（在上面的示例中：120），同時用平均值替換 NA 值。
uj5u.com熱心網友回復：
您可以使用 將字符列轉換為小時和分鐘lubridate::hm，然后將值轉換為分鐘。然后，我們可以用NA分鐘列的平均值替換任何值。
library(lubridate)
df <- data.frame(ipaq_2 = c("1:00", "0:45", "0:30", "1:30", NA))
df$ipaq_2 <- hm(df$ipaq_2, quiet = TRUE) # format to 'hours:minutes:seconds'
df$minutes <- hour(df$ipaq_2)*60 minute(df$ipaq_2)
df$minutes[is.na(df$minutes)] <- mean(df$minutes, na.rm = TRUE)
或另一種可能性（感謝@Ben）：
df$minutes <- as.numeric(hm(df$ipaq_2, quiet = T))/60
df$minutes[is.na(df$minutes)] <- mean(df$minutes, na.rm = TRUE)
或與tidyverse：
library(tidyverse)
library(lubridate)
df %>%
mutate(ipaq_2 = hm(ipaq_2, quiet = TRUE),
minutes = hour(ipaq_2)*60 minute(ipaq_2),
minutes = ifelse(is.na(minutes), mean(minutes, na.rm = TRUE), minutes))
# Or using the alternative above:
# df %>%
# mutate(minutes = as.numeric(hm(ipaq_2, quiet = T))/60,
# minutes = ifelse(is.na(minutes), mean(minutes, na.rm = TRUE), minutes))
輸出
ipaq_2 minutes
1 1H 0M 0S 60.00
2 45M 0S 45.00
3 30M 0S 30.00
4 1H 30M 0S 90.00
5 <NA> 56.25
轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/432168.html