memoization code snippets in r