Skip to content
GitLab
Switch branch/tag
Find file Normal viewHistoryPermalink
output_spadl.R 333 Bytes
Newer Older
Masaki Ban's avatar
SPADL形式用のプログラムの追加  
Masaki Ban committed
1
2
3 
library(tidyverse)
source("R/read_rcg.R")
source("R/read_rcl.R")
Masaki Ban's avatar
ファイル名の修正    
Masaki Ban committed
4 
source("R/rcg_convert.R")
Masaki Ban's avatar
SPADL形式用のプログラムの追加  
Masaki Ban committed
5
6
7
8
9
10
11
12 
source("R/rcl_convert.R")

rcg <- read_rcg("data/20220405162804-HELIOS_base_3-vs-enemy_2.rcg")
rcl <- read_rcl("data/20220405162804-HELIOS_base_3-vs-enemy_2.rcl")

ball <- get_ball(rcg)
agent <- get_agent_pos(rcg)
command <- get_command(rcl)