Google Cast自定义接收器CORS标头

Question

我正在尝试构建Google Cast自定义接收器。

我尝试了下面的基本接收器示例来播放youtube视频，但我收到了CORS标题问题。

library(dplyr)
name <- c("Jeff", "Jeff", "Jill", "Jill", "Angie")
total <- c(123, 234, 345, 456, 567)
code <- c("abc", "xyz", "abc", "xyz", "abc")

table <- data.frame(name, total, code)

table %>% 
  group_by(name) %>%
  filter(any(code == "xyz") & any(code =="abc" ))
#> # A tibble: 4 x 3
#> # Groups: name [2]
#>   name  total code 
#>   <fct> <dbl> <fct>
#> 1 Jeff    123 abc  
#> 2 Jeff    234 xyz  
#> 3 Jill    345 abc  
#> 4 Jill    456 xyz

如何在CAF接收器中设置CORS标头，任何建议