some R Code snippets..