openai code snippets in r