У меня есть этот пример набора данных (example_data
) мест хоккейных ударов, которые я хочу нанести на каток.
structure(list(game_date = structure(c(17674, 17674, 17674, 17674,
17674), class = "Date"), event_team = c("WSH", "WSH", "T.B",
"T.B", "T.B"), event_description = c("WSH #8 OVECHKIN(12), Slap, Off. Zone, 53 ft.Assists: #92 KUZNETSOV(13); #43 WILSON(8) Expected Goal Prob: 1.6%",
"WSH ONGOAL - #92 KUZNETSOV, Wrist, Off. Zone, 13 ft. Expected Goal Prob: 50.4%",
"T.B ONGOAL - #17 KILLORN, Backhand, Off. Zone, 18 ft. Expected Goal Prob: 4.5%",
"T.B ONGOAL - #17 KILLORN, Wrist, Off. Zone, 23 ft. Expected Goal Prob: 4.6%",
"T.B ONGOAL - #27 MCDONAGH, Slap, Off. Zone, 57 ft. Expected Goal Prob: 1.2%"
), event_type = c(1, 0, 0, 0, 0), home_team = c("T.B", "T.B",
"T.B", "T.B", "T.B"), away_team = c("WSH", "WSH", "WSH", "WSH",
"WSH"), coords_x = c(-42, -80.3, 71, 67, 34), coords_y = c(-21,
12, -3, 9, 19)), class = c("tbl_df", "tbl", "data.frame"), row.names = c(NA,
-5L))
Я успешно встроил каток с ответом на мой предыдущий вопрос .Теперь я хочу встроить два логотипа (логотипы команды хозяев / гостей), и я пробовал этот код безрезультатно ...
example_data %>%
plot_ly(x = ~coords_x, y=~coords_y,
text= ~event_description) %>%
add_markers(size = ~event_type,
sizes = c(150, 700),
alpha = 0.75,
color = ~factor(event_team),
colors = c("black", "slategrey")
) %>%
layout(
xaxis = list(range = c(-100,100)),
yaxis = list(range = c(-45,45)),
images= list(
list(
source= "https://i.imgur.com/Y2kOUX5.png",
xref= "paper",
yref= "paper",
x= 0,
y= 1,
sizex= 1,
sizey= 1,
opacity= 0.8,
layer = "below"),
list(
source = "http://www.capsinfo.com/images/NHL_Team_Logos/NHL_Ducks_Primary.png"
)
)
)
Что я делаю не так?Я думаю, мне нужно указать xref
, yref
и т. Д. Внутри списка, но я понятия не имею, что означают эти параметры