R/check_rh.R

In JestonBlu/RobinHood: Interface for the RobinHood.com No Commission Investing Platform

#' Checks to see if you have a valid RobihHood object
#'
#' @param RH object of class RobinHood
#' @export
check_rh <- function(RH) {

    # Check if RH is the correct class
    if (methods::is(RH) != "RobinHood") stop("RH must be class RobinHood, see RobinHood()")

}