我有一個date
包含多個名稱和相應日期的向量。例如:
lastUpdate <- as.Date(c(RMO = 18659, NKLA = 18659, JD = 18659, AAPL = 18901,
IBM = 18901, SPCE = 18659, MRNA = 18901, MPNGF = 18659),
origin = "1970-01-01")
但是,我想將lastUpdate
其分為相應的名稱向量(即character
類)和日期向量(即Date
類)。手動它例如是:
手動提取是可能的,但很乏味(特別是如果列表更長):
lastUpdateSymbols <- c("RMO", "NKLA", "JD", "AAPL", "IBM", "SPCE", "MRNA", "MPNGF")
lastUpdateDates <- as.Date(c(18659, 18659, 18659, 18901, 18901, 18659, 18901,
18659), origin = "1970-01-01")
我的問題:
System Libraries
,什麼代碼可以自動lastUpdate
分為lastUpdateSymbols
僅包含名稱(即character
類)和lastUpdateDates
僅包含日期(即Date
類),同時尊重對象內容的順序/對應關係lastUpdate
?提前致謝。
使用的系統:
1)使用enframe
after whichframe$name
並frame$value
給出兩個部分或將其與with(frame, ...)
where ...
is 任何使用name
and/or 的表達式一起使用value
。
library(tibble)
frame <- enframe(lastUpdate); frame
給予:
# A tibble: 8 x 2
name value
<chr> <date>
1 RMO 2021-02-01
2 NKLA 2021-02-01
3 JD 2021-02-01
4 AAPL 2021-10-01
5 IBM 2021-10-01
6 SPCE 2021-02-01
7 MRNA 2021-10-01
8 MPNGF 2021-02-01
2)或將每個提取到一個變量中(無包):
Names <- names(lastUpdate)
Values <- unname(lastUpdate)
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句