[R-SIG-Finance] Web Scraping of SPY Stocks

Joshua Ulrich jo@h@m@u|r|ch @end|ng |rom gm@||@com
Sat Sep 26 14:34:09 CEST 2020


Please repost your message in plain text (as the posting guide
requests).  As you can see below, your HTML message was mangled when
the list server converted it to plain text.

On Fri, Sep 25, 2020 at 3:12 PM AIE ATUMA via R-SIG-Finance
<r-sig-finance using r-project.org> wrote:
>
> Dear All,
> Please I need help. I ran the below function and got the highlighted error message. How can I correct it?
> library(rvest)# Web-scrape SP500 stock listsp_500 <- read_html("https://en.wikipedia.org/wiki/List_of_S%26P_500_companies") %>%html_node("table.wikitable") %>%html_table() %>%select(`Ticker symbol`, Security, `GICS Sector`, `GICS Sub Industry`) %>%as_tibble()# Format namesnames(sp_500) <- sp_500 %>%names() %>%str_to_lower() %>%make.names()# Show resultssp_500
> Error Message:
> Error: Can't subset columns that don't exist.x Column `Ticker symbol` doesn't exist.Run `rlang::last_error()` to see where the error occurred.
>
> The second function and the error is below:
> get_stock_prices <- function(ticker), return_format = "tibble", ...) {  # Get stock prices  stock_prices_xts <- getSymbols(Symbols = ticker, auto.assign = FALSE, ...)  # Rename  names(stock_prices_xts) <- c("Open", "High", "Low", "Close", "Volume", "Adjusted")  # Return in xts format if tibble is not specified  if (return_format == "tibble") {    stock_prices <- stock_prices_xts %>%      as_tibble() %>%      rownames_to_column(var = "Date") %>%      mutate(Date = mdy(Date))  } else {    stock_prices <- stock_prices_xts  }  stock_prices}
> "MA" %>%  get_stock_prices(return_format = 'tibble')%>%head()
> ERROR MESSAGE:
> Warning message:All formats failed to parse. No formats found.
>
>
> Thank You and Best Regards, Emeka I. AtumaIntegrity - Walk Your Talk Don't Talk Your Work
>
>
>
>         [[alternative HTML version deleted]]
>
> _______________________________________________
> R-SIG-Finance using r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-sig-finance
> -- Subscriber-posting only. If you want to post, subscribe first.
> -- Also note that this is not the r-help list where general R questions should go.



-- 
Joshua Ulrich  |  about.me/joshuaulrich
FOSS Trading  |  www.fosstrading.com



More information about the R-SIG-Finance mailing list