tests/testthat/test-line.R
In UchidaMizuki/japanmesh: Functions for the Grid Square Codes in Japan
test_that("line", {
x <- parse_grid(c("644142", "533946", "523667", "523503", "503033"), "10km")
y <- c(utils::tail(x, -1), x[1])
expect_true(is.list(grid_line(x, y)))
expect_true(is.list(grid_line(list(x, y))))
})
UchidaMizuki/japanmesh documentation built on April 14, 2025, 1:39 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
test_that("line", {
x <- parse_grid(c("644142", "533946", "523667", "523503", "503033"), "10km")
y <- c(utils::tail(x, -1), x[1])
expect_true(is.list(grid_line(x, y)))
expect_true(is.list(grid_line(list(x, y))))
})
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.