Last updated on 2025-11-06 01:50:59 CET.
| Package | ERROR | NOTE | OK |
|---|---|---|---|
| jmastats | 13 | ||
| jpmesh | 13 | ||
| ssrn | 13 | ||
| sudachir | 5 | 8 | |
| tabularmaps | 13 | ||
| zipangu | 4 | 6 | 3 |
Current CRAN status: OK: 13
Current CRAN status: OK: 13
Current CRAN status: OK: 13
Current CRAN status: NOTE: 5, OK: 8
Version: 0.1.0
Check: dependencies in R code
Result: NOTE
Namespace in Imports field not imported from: ‘tidyselect’
All declared Imports should be used.
Flavors: r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc
Version: 0.1.0
Check: LazyData
Result: NOTE
'LazyData' is specified without a 'data' directory
Flavors: r-oldrel-macos-arm64, r-oldrel-macos-x86_64, r-oldrel-windows-x86_64
Current CRAN status: OK: 13
Current CRAN status: ERROR: 4, NOTE: 6, OK: 3
Version: 0.3.3
Check: DESCRIPTION meta-information
Result: NOTE
Missing dependency on R >= 4.1.0 because package code uses the pipe
|> or function shorthand \(...) syntax added in R 4.1.0.
File(s) using such syntax:
‘convert-jyear-legacy.R’
Flavors: r-devel-linux-x86_64-debian-clang, r-devel-linux-x86_64-debian-gcc, r-devel-linux-x86_64-fedora-clang, r-devel-linux-x86_64-fedora-gcc, r-devel-windows-x86_64, r-patched-linux-x86_64, r-release-linux-x86_64, r-release-macos-arm64, r-release-macos-x86_64, r-release-windows-x86_64
Version: 0.3.3
Check: tests
Result: ERROR
Running ‘testthat.R’ [7s/7s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(zipangu)
>
> test_check("zipangu")
[ FAIL 1 | WARN 0 | SKIP 2 | PASS 143 ]
══ Skipped tests (2) ═══════════════════════════════════════════════════════════
• On CRAN (2): 'test-jholiday.R:75:3', 'test-zipcode.R:90:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-address.R:82:3'): address separate works ───────────────────────
<purrr_error_indexed/rlang_error/error/condition>
Error in `purrr::map(str, function(str) {
split_pref <- stringr::str_split(str, stringr::regex("(?<=(東京都|道|府|県))"),
n = 2, simplify = TRUE) %>% stringr::str_subset(".{1}",
negate = FALSE)
if (length(split_pref) == 1L) {
if (is_prefecture(str)) {
split_pref <- c(split_pref, NA_character_)
}
else {
if (stringr::str_detect(split_pref, city_name_regex)) {
split_pref <- c(NA_character_, split_pref)
}
else {
split_pref <- c(NA_character_, NA_character_)
}
}
}
res <- list(prefecture = split_pref[1])
if (length(split_pref[2] %>% stringr::str_split(city_name_regex,
n = 2, simplify = TRUE) %>% stringr::str_subset(".{1}",
negate = FALSE)) == 0L) {
res <- res %>% purrr::list_merge(city = split_pref[2] %>%
dplyr::if_else(is_address_block(.), stringr::str_remove(.,
"((土地区画|街区).+)") %>% stringr::str_remove("土地区画|街区"),
.) %>% stringr::str_replace("(.市)(.+町.+)",
"\\1") %>% stringr::str_replace(city_name_regex,
replacement = "\\1"))
}
else {
res <- res %>% purrr::list_merge(city = split_pref[2] %>%
dplyr::if_else(is_address_block(.), stringr::str_remove(.,
"((土地区画|街区).+)") %>% stringr::str_remove("土地区画|街区"),
.) %>% stringr::str_replace(paste0(city_name_regex,
"(.+)"), replacement = "\\1"))
}
res <- res %>% purrr::list_merge(street = split_pref[2] %>%
stringr::str_remove(res %>% purrr::pluck("city")))
res %>% purrr::map(~dplyr::if_else(.x == "", NA_character_,
.x))
})`: ℹ In index: 1.
Caused by error in `str_replace()`:
! `pattern` can not contain NAs.
[ FAIL 1 | WARN 0 | SKIP 2 | PASS 143 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-debian-gcc
Version: 0.3.3
Check: tests
Result: ERROR
Running ‘testthat.R’ [17s/23s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(zipangu)
>
> test_check("zipangu")
[ FAIL 1 | WARN 0 | SKIP 2 | PASS 143 ]
══ Skipped tests (2) ═══════════════════════════════════════════════════════════
• On CRAN (2): 'test-jholiday.R:75:3', 'test-zipcode.R:90:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-address.R:82:3'): address separate works ───────────────────────
<purrr_error_indexed/rlang_error/error/condition>
Error in `purrr::map(str, function(str) {
split_pref <- stringr::str_split(str, stringr::regex("(?<=(東京都|道|府|県))"),
n = 2, simplify = TRUE) %>% stringr::str_subset(".{1}",
negate = FALSE)
if (length(split_pref) == 1L) {
if (is_prefecture(str)) {
split_pref <- c(split_pref, NA_character_)
}
else {
if (stringr::str_detect(split_pref, city_name_regex)) {
split_pref <- c(NA_character_, split_pref)
}
else {
split_pref <- c(NA_character_, NA_character_)
}
}
}
res <- list(prefecture = split_pref[1])
if (length(split_pref[2] %>% stringr::str_split(city_name_regex,
n = 2, simplify = TRUE) %>% stringr::str_subset(".{1}",
negate = FALSE)) == 0L) {
res <- res %>% purrr::list_merge(city = split_pref[2] %>%
dplyr::if_else(is_address_block(.), stringr::str_remove(.,
"((土地区画|街区).+)") %>% stringr::str_remove("土地区画|街区"),
.) %>% stringr::str_replace("(.市)(.+町.+)",
"\\1") %>% stringr::str_replace(city_name_regex,
replacement = "\\1"))
}
else {
res <- res %>% purrr::list_merge(city = split_pref[2] %>%
dplyr::if_else(is_address_block(.), stringr::str_remove(.,
"((土地区画|街区).+)") %>% stringr::str_remove("土地区画|街区"),
.) %>% stringr::str_replace(paste0(city_name_regex,
"(.+)"), replacement = "\\1"))
}
res <- res %>% purrr::list_merge(street = split_pref[2] %>%
stringr::str_remove(res %>% purrr::pluck("city")))
res %>% purrr::map(~dplyr::if_else(.x == "", NA_character_,
.x))
})`: ℹ In index: 1.
Caused by error in `str_replace()`:
! `pattern` can not contain NAs.
[ FAIL 1 | WARN 0 | SKIP 2 | PASS 143 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-fedora-clang
Version: 0.3.3
Check: tests
Result: ERROR
Running ‘testthat.R’ [16s/22s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(zipangu)
>
> test_check("zipangu")
[ FAIL 1 | WARN 0 | SKIP 2 | PASS 143 ]
══ Skipped tests (2) ═══════════════════════════════════════════════════════════
• On CRAN (2): 'test-jholiday.R:75:3', 'test-zipcode.R:90:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-address.R:82:3'): address separate works ───────────────────────
<purrr_error_indexed/rlang_error/error/condition>
Error in `purrr::map(str, function(str) {
split_pref <- stringr::str_split(str, stringr::regex("(?<=(東京都|道|府|県))"),
n = 2, simplify = TRUE) %>% stringr::str_subset(".{1}",
negate = FALSE)
if (length(split_pref) == 1L) {
if (is_prefecture(str)) {
split_pref <- c(split_pref, NA_character_)
}
else {
if (stringr::str_detect(split_pref, city_name_regex)) {
split_pref <- c(NA_character_, split_pref)
}
else {
split_pref <- c(NA_character_, NA_character_)
}
}
}
res <- list(prefecture = split_pref[1])
if (length(split_pref[2] %>% stringr::str_split(city_name_regex,
n = 2, simplify = TRUE) %>% stringr::str_subset(".{1}",
negate = FALSE)) == 0L) {
res <- res %>% purrr::list_merge(city = split_pref[2] %>%
dplyr::if_else(is_address_block(.), stringr::str_remove(.,
"((土地区画|街区).+)") %>% stringr::str_remove("土地区画|街区"),
.) %>% stringr::str_replace("(.市)(.+町.+)",
"\\1") %>% stringr::str_replace(city_name_regex,
replacement = "\\1"))
}
else {
res <- res %>% purrr::list_merge(city = split_pref[2] %>%
dplyr::if_else(is_address_block(.), stringr::str_remove(.,
"((土地区画|街区).+)") %>% stringr::str_remove("土地区画|街区"),
.) %>% stringr::str_replace(paste0(city_name_regex,
"(.+)"), replacement = "\\1"))
}
res <- res %>% purrr::list_merge(street = split_pref[2] %>%
stringr::str_remove(res %>% purrr::pluck("city")))
res %>% purrr::map(~dplyr::if_else(.x == "", NA_character_,
.x))
})`: ℹ In index: 1.
Caused by error in `str_replace()`:
! `pattern` can not contain NAs.
[ FAIL 1 | WARN 0 | SKIP 2 | PASS 143 ]
Error: Test failures
Execution halted
Flavor: r-devel-linux-x86_64-fedora-gcc
Version: 0.3.3
Check: tests
Result: ERROR
Running ‘testthat.R’ [9s/12s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
> library(testthat)
> library(zipangu)
>
> test_check("zipangu")
[ FAIL 1 | WARN 0 | SKIP 2 | PASS 143 ]
══ Skipped tests (2) ═══════════════════════════════════════════════════════════
• On CRAN (2): 'test-jholiday.R:75:3', 'test-zipcode.R:90:3'
══ Failed tests ════════════════════════════════════════════════════════════════
── Error ('test-address.R:82:3'): address separate works ───────────────────────
<purrr_error_indexed/rlang_error/error/condition>
Error in `purrr::map(str, function(str) {
split_pref <- stringr::str_split(str, stringr::regex("(?<=(東京都|道|府|県))"),
n = 2, simplify = TRUE) %>% stringr::str_subset(".{1}",
negate = FALSE)
if (length(split_pref) == 1L) {
if (is_prefecture(str)) {
split_pref <- c(split_pref, NA_character_)
}
else {
if (stringr::str_detect(split_pref, city_name_regex)) {
split_pref <- c(NA_character_, split_pref)
}
else {
split_pref <- c(NA_character_, NA_character_)
}
}
}
res <- list(prefecture = split_pref[1])
if (length(split_pref[2] %>% stringr::str_split(city_name_regex,
n = 2, simplify = TRUE) %>% stringr::str_subset(".{1}",
negate = FALSE)) == 0L) {
res <- res %>% purrr::list_merge(city = split_pref[2] %>%
dplyr::if_else(is_address_block(.), stringr::str_remove(.,
"((土地区画|街区).+)") %>% stringr::str_remove("土地区画|街区"),
.) %>% stringr::str_replace("(.市)(.+町.+)",
"\\1") %>% stringr::str_replace(city_name_regex,
replacement = "\\1"))
}
else {
res <- res %>% purrr::list_merge(city = split_pref[2] %>%
dplyr::if_else(is_address_block(.), stringr::str_remove(.,
"((土地区画|街区).+)") %>% stringr::str_remove("土地区画|街区"),
.) %>% stringr::str_replace(paste0(city_name_regex,
"(.+)"), replacement = "\\1"))
}
res <- res %>% purrr::list_merge(street = split_pref[2] %>%
stringr::str_remove(res %>% purrr::pluck("city")))
res %>% purrr::map(~dplyr::if_else(.x == "", NA_character_,
.x))
})`: ℹ In index: 1.
Caused by error in `str_replace()`:
! `pattern` can not contain NAs.
[ FAIL 1 | WARN 0 | SKIP 2 | PASS 143 ]
Error: Test failures
Execution halted
Flavor: r-patched-linux-x86_64