Nothing
#' Get analyst raings for a given equity symbol from RobinHood
#'
#' @param RH object class RobinHood
#' @param symbol (string) Ticker symbol
#' @import httr magrittr
#' @export
#' @examples
#' \dontrun{
#' # Login in to your RobinHood account
#' RH <- RobinHood("username", "password")
#'
#' get_ratings(RH, symbol = "CAT")
#'}
get_ratings <- function(RH, symbol) {
# Check if RH is valid
RobinHood::check_rh(RH)
# Get request from user information API
ratings <- RobinHood::api_ratings(RH, symbol)
return(ratings)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.