我試圖建立的邏輯如下
我的表 date,date1,date2,date3 中有 4 個日期列
如果 date & date1 非空(非空),x=date-date1 else date & date2 非空,x= date-date2 else date &date3 非空,x = date-date3 .. 其中 x 是我試圖推匯出的指標。
我已經在 jupyter 中測驗了下面的代碼,它運行良好,因為我能夠驗證。
df$ttf <- ifelse((!is.na(df$date) & !is.na(df$date1)), df$ttf <- mondf(df$date1,df$date),
ifelse((!is.na(df$date) & !is.na(df$date2)), df$ttf <- mondf(df$date2,df$date),
ifelse((!is.na(df$date) & !is.na(df$date3)), df$ttf <- mondf(df$date3,df$date),
NA)))
但是,當我在 GCP 中運行此作業時,出現以下錯誤
object of type 'closure' is not subsettable "
uj5u.com熱心網友回復:
試試這個,如果它能讓你前進。該df$ttf <- 范圍內的ifelse應予洗掉。
df <- transform(df, ttf=ifelse(!is.na(date) & !is.na(date1), date1 - date,
ifelse(!is.na(date) & !is.na(date2), date2 - date,
ifelse(!is.na(date) & !is.na(date3), date3 - date,
NA))))
df
# date date1 date2 date3 ttf
# 1 2021-01-01 2021-03-12 2021-05-21 2021-07-30 70
# 2 2021-01-15 2021-03-26 2021-06-04 2021-08-13 70
# 3 2021-01-29 2021-04-09 2021-06-18 2021-08-27 70
# 4 2021-02-12 2021-04-23 2021-07-02 2021-09-10 70
# 5 2021-02-26 2021-05-07 2021-07-16 2021-09-24 70
# 6 2021-03-12 2021-05-21 2021-07-30 2021-10-08 70
資料:
df <- structure(list(date = structure(c(18628, 18642, 18656, 18670,
18684, 18698), class = "Date"), date1 = structure(c(18698, 18712,
18726, 18740, 18754, 18768), class = "Date"), date2 = structure(c(18768,
18782, 18796, 18810, 18824, 18838), class = "Date"), date3 = structure(c(18838,
18852, 18866, 18880, 18894, 18908), class = "Date")), class = "data.frame", row.names = c(NA,
-6L))
轉載請註明出處,本文鏈接:https://www.uj5u.com/qiye/399459.html
上一篇:條件分頁javascript
