Connect to bettermentdb from R