लापता तिथियों

Question

के साथ इंटरपोलेट चिड़ियाघर ऑब्जेक्ट में मेरे पास लापता तिथियों (गुम मूल्यों के साथ) के साथ एक जलवायु समय श्रृंखला है। उदाहरण के लिए:

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' वेक्टर दिया? धन्यवाद!

Answer 1

"खाली" ऑब्जेक्ट के साथ विलय करें जिसमें आपकी सभी तिथियां हैं, फिर गुम मूल्यों को भरने के लिए na.approx (या na.spline, आदि) का उपयोग करें।

x <- merge(serie, zoo(,seq(start(serie),end(serie),by="day")), all=TRUE) 
x <- na.approx(x)