Advertisement
Guest User

test

a guest
Mar 19th, 2012
104
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
R 0.34 KB | None | 0 0
  1. require(zoo)
  2. require(chron)
  3. setwd("/home/knavero/Desktop/")
  4.  
  5. fmt = "%m/%d/%Y %H:%M"
  6. tail1 = function(x) tail(x, 1)
  7. rawData = read.zoo("weatherData.txt", header = T, FUN = as.chron,
  8.    format = fmt, sep = "\t", aggregate = tail1)
  9.  
  10. oneMin = seq(start(rawData), end(rawData), by = times("01:00:00"))
  11. intData = na.approx(rawData, xout = oneMin)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement