xml element name discrepancy

[uribo]

メールでの問合せから。

FG-GML-6442-01-dem10B-20161001をread_fgdr_dem(return_class = "stars")で実行すると下記のエラー。

XMLファイルのvis要素があるためにメッシュコードを参照する位置がずれているものと思われる。

library(fgdr)
r <- 
    read_fgd_dem("FG-GML-6442-01-dem10B-20161001.xml", 
                 resolution = 10, 
                 return_class = "stars")
#> meshcode must be numeric ranges 4 to 11 digits
#> Error in UseMethod("st_transform"): no applicable method for 'st_transform' applied to an object of class "NULL"

xml_opts <- "HUGE"
file_info <- fgdr:::fgd_dem_file_info(file, options = xml_opts)
file_info$meshcode
#> [1] "10mメッシュ（標高）"

# 他のもの
file_info <- fgdr:::fgd_dem_file_info("FG-GML-5439-17-dem10b-20161001.xml", options = xml_opts)
file_info$meshcode
#> [1] "543917"

^{Created on 2020-08-19 by the reprex package (v0.3.0)}