Stream prediction

stream.R

#increments model and predicts
for(i in 2:nrow(dataset)) {
  predictions[i] <- predict.model(model.name, my.model, dataset[i,])
  my.model <- update.model(model.name, Real~., dataset[i,], my.model)    
}