if (FALSE) {
# Login in to your RobinHood account
RH <- RobinHood("username", "password")
# Place an order, should generate an email confirmation
x <- place_order_crypto(RH = RH,
symbol = "DOGE", # Ticker symbol
type = "market", # Type of market order (market, limit)
time_in_force = "gtc", # Time period (gfd: good for day)
price = .003, # The highest price you are willing to pay
quantity = 500, # Number of shares you want
side = "buy") # buy or sell
}
Run the code above in your browser using DataLab