Question

尝试运行以下R代码。

> sp_500 <- sp_500 %>%
+   
+   mutate(
+     stock.prices = map(ticker.symbol, 
+                        function(.x) get_stock_prices(.x, 
+                                                      return_format = "tibble",
+                                                      from = "2017-01-01",
+                                                      to = "2017-09-21")
+     ),
+     log.returns  = map(stock.prices, 
+                        function(.x) get_log_returns(.x, return_format = "tibble")),
+     mean.log.returns = map_dbl(log.returns, ~ mean(.$Log.Returns)),
+     sd.log.returns   = map_dbl(log.returns, ~ sd(.$Log.Returns)),
+     n.trade.days = map_dbl(stock.prices, nrow)

但我一直收到这个错误：

Warning: BRK.B download failed; trying again.
Error in mutate_impl(.data, dots) : 
  Evaluation error: BRK.B download failed after two attempts. Error message:
HTTP error 404..

有谁知道我做错了什么？

最诚挚的问候安莎

Answer 1

下载特定代码似乎有问题。我不是开发人员，但我遇到了和你一样的问题，并通过删除这些代码（小于10）来修复它。删除它们的代码可以在取代这段代码的同一页面上找到它的

sp_500 <- sp_500 %>% 
    filter(ticker.symbol != "BRK.B")

我希望它有所帮助。

Answer 2

BRK.B股票基本上存在问题，我不确定这是什么，但是解决该问题的方法是消除它们。

函数中还有其他股票，这就是我的解决方法：

sp_500 <- sp_500[c(-72,-86, -82, -163, -268, -460, -392),] %>%
 mutate(
stock.prices = map(ticker.symbol, 
                   function(.x) get_stock_prices(.x, 
                                                 return_format = "tibble",
                                                 from = "2007-01-01",
                                                 to = "2018-10-23")
),
log.returns  = map(stock.prices, 
                   function(.x) get_log_returns(.x, return_format = "tibble")),
mean.log.returns = map_dbl(log.returns, ~ mean(.$Log.Returns)),
sd.log.returns   = map_dbl(log.returns, ~ sd(.$Log.Returns)),
n.trade.days = map_dbl(stock.prices, nrow)
)

[c（-72，-86，-82，-163，-268，-460，-392），]是对我不起作用的股票，因为它显示和错误，基本上可以找到列通过查看股票名称会发现错误，并查看它们在哪一列中并消除它们

希望有帮助

运行R代码时出现Mutate_impl错误

2 个答案: