Create TextAnalytics2.R