if (FALSE) {
# Get stored refresh token
refreshToken = readRDS('/secure/location/')
# Generate a new access token
accessTokenList = schwab_auth3_accessToken(appKey, appSecret, refreshToken)
# Passing the accessTokenList is optional. The default will return balances
asDF = schwab_accountData()
asList = schwab_accountData('list',account_number = '', accessTokenList)
}
Run the code above in your browser using DataLab