descriptive statistics code snippets in r