12

日付が欠落している (値が欠落していない) 気候時系列があります。例えば:

n = 15
full.dates = seq(Sys.Date(), by = 'day', length = n)
serie.dates = full.dates[c(1:10, 12, 15)] # missing 11, 13, 14
y = rnorm(n)

require(zoo)    
serie = zoo(y, serie.dates)

「full.dates」ベクトルを指定して、これらの欠落したポイントを (補間を使用して) 「埋める」にはどうすればよいですか? ありがとう!

4

1 に答える 1

18

必要なすべての日付を持つ「空の」オブジェクトとマージし、na.approx(またはna.splineなど) を使用して欠落している値を埋めます。

x <- merge(serie, zoo(,seq(start(serie),end(serie),by="day")), all=TRUE)
x <- na.approx(x)
于 2013-02-27T14:44:38.867 に答える