Before deleting some R code
Shared Version
write out to relative location