From 2065aa03f00a866082f1f6eb20f0c1e8dd32b982 Mon Sep 17 00:00:00 2001 From: k18079 Date: Thu, 17 Nov 2022 19:38:57 +0900 Subject: [PATCH] =?UTF-8?q?[fix]read=5Frcl=E3=81=A7referee=E3=81=AE?= =?UTF-8?q?=E3=82=B3=E3=83=9E=E3=83=B3=E3=83=89=E3=81=8Cteam=E3=81=A8agent?= =?UTF-8?q?=E3=81=AB=E6=8A=BD=E5=87=BA=E3=81=95=E3=82=8C=E3=82=8B=E5=95=8F?= =?UTF-8?q?=E9=A1=8C=E3=81=AE=E4=BF=AE=E6=AD=A3?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- R/read_rcl.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/read_rcl.R b/R/read_rcl.R index 156d4ba..51ef5ee 100644 --- a/R/read_rcl.R +++ b/R/read_rcl.R @@ -10,7 +10,7 @@ read_rcl <- function(path) { tibble::as_tibble() |> dplyr::mutate( step = value |> stringr::str_extract("\\d+"), - agent = value |> stringr::str_extract("\\w+_([0-9]{1,2}|Coach)"), + agent = value |> stringr::str_extract("\\w+_([0-9]{1,2}|Coach)(?!\\))"), team = agent |> stringr::str_remove("_([0-9]{1,2}|Coach)"), unum = agent |> stringr::str_extract("([0-9]{1,2}|Coach)$"), commands = value |> -- GitLab