Closed Rindrics closed 4 years ago
問題は
https://github.com/akikirinrin/lucifer/blob/d32bd3c1d8693ee7938c02c57685ad68aff273e9/R/shapetools.R#L259
の部分.
というヘンテコなデータだけのためにこんな危険な仕様になっている
data <- "excels/hachinohe_ichiba.xls" %>% lucifer::rebel_sheet(sheet = "1008_若鷹", cluster = list(regex = "性別", dir = "v", pos = 2, offset = c(0, -1), ends = list(row = ".+", col = "^採鱗$"), info = list(key_offset = c(-1, 1), key_dim = c(1, 7), value_offset = c(1, 1), value_dim = c(1, 7))))
安直な実装は row_remove = FALSE を追加することだが...
row_remove = FALSE
そもそも問題の1行は不要なのではないか. 余分な行が追加されるなら,使用者が明示的に除去すればいい.
問題は
https://github.com/akikirinrin/lucifer/blob/d32bd3c1d8693ee7938c02c57685ad68aff273e9/R/shapetools.R#L259
の部分.
というヘンテコなデータだけのためにこんな危険な仕様になっている