Using OpenAI with a Dataframe as Reference in Shiny for Text Generation and Analysis