Во-первых, пожалуйста, извините моего бедного Энгли sh ^ _ ^
Я новичок в R, недавно я обнаружил функцию Plot_ly()
, и я просто хочу улучшить себя , В настоящее время я пытаюсь использовать это для визуализации спортивной игры (вы можете представить игру сверху, так что игроки превращаются в движущиеся точки). Вот пример:
Library(plotly)
# the dataframe
time=rep(c(1,2,3,4,5),5) # the time variable
j=c(rep('a',5), # name of each player
rep('b',5),
rep('c',5),
rep('d',5),
rep('e',5))
coord_x=c(15,17,19,15,12, # x coordinates of each player
11,11,10,8,9,
2,4,4,5,3,
1,4,7,8,9,
9,10,13,11,10)
coord_y=c(3,4,6,8,7, # y coordinates of each player
5,6,6,6,5,
10,12,14,16,18,
20,18,18,18,17,
9,10,11,11,13)
data=data.frame(cbind(time,j,coord_x,coord_y))
data[,1]=as.numeric(as.character(data[,1]))
data[,3]=as.numeric(as.character(data[,3]))
data[,4]=as.numeric(as.character(data[,4]))
# the plot
p <- plot_ly(data = data,
x = ~data$coord_x,
y = ~data$coord_y,
type = 'scatter',
mode = 'points',
frame = ~data$time,
color = ~data$j
) %>%
animation_opts(
1000, easing = "elastic", redraw = FALSE
)
p
Я видел, что мы можем добавить след (ы) на график (с add_trace
/ add_area
/ add_paths
и другими), но я не могу найти, как использовать Это. Я хотел бы добавить область движущегося многоугольника (и, если возможно, я хотел бы иметь значение ...) или добавить его, например, выпуклый корпус . Возможно ли это с помощью этой функции? А если нет, то какую функцию можно использовать для этого?
Надеюсь, мой английский sh понятен и рад прочитать ваши ответы:)
QB