回答編集履歴
1
補充
answer
CHANGED
|
@@ -11,4 +11,28 @@
|
|
|
11
11
|
あなたの d0 や d1 のように、
|
|
12
12
|
すでに CSV に “日時” が入っているなら、dates を seq() で自作する必要はありません。
|
|
13
13
|
|
|
14
|
-
read.zoo() が自動的に datetime をインデックスにできます。
|
|
14
|
+
read.zoo() が自動的に datetime をインデックスにできます。
|
|
15
|
+
|
|
16
|
+
以下だけで OK です：
|
|
17
|
+
library(zoo)
|
|
18
|
+
library(xts)
|
|
19
|
+
|
|
20
|
+
d0 <- read.csv("Book1.csv")
|
|
21
|
+
|
|
22
|
+
# A列をDatetimeとして読み込む
|
|
23
|
+
d1 <- read.zoo(d0, format="%Y/%m/%d %H:%M:%S", tz="", index.column=1)
|
|
24
|
+
|
|
25
|
+
# xtsへ変換
|
|
26
|
+
d1 <- as.xts(d1)
|
|
27
|
+
|
|
28
|
+
head(d1)
|
|
29
|
+
📌 今回の結論
|
|
30
|
+
|
|
31
|
+
あなたがやりたかったこと（A列を時刻、B列を観測値として xts にしたい）は、
|
|
32
|
+
|
|
33
|
+
✔ seq() は不要
|
|
34
|
+
✔ read.zoo() + as.xts() で一発で解決できる
|
|
35
|
+
|
|
36
|
+
です！
|
|
37
|
+
|
|
38
|
+
|