RE:demo/import.R wrote demo.RData result into wrong directory

I removed getwd() before dataDir in line 16 from Paul's latest version:
> serializedFile <- file.path(dataDir, "demo.RData")
The code is running on my computer now.