mapviewを使用して地図を表示data.frameのマルチバイト文字を含む

Question

mapviewパッケージを使用してデータを表示したい。

が含まれていますが、マルチバイト文字が含まれているため、地図を表示できないことがあります。

マップを表示するにはどうすればよいでしょうか？

library(mapview) 
data(atlStorms2005) 
test1 <- test2 <- atlStorms2005 

test1@data$test <- as.factor(c("日本語", "てすと")) 
test2@data$test <- as.factor(c("日本語", "五十嵐")) 

mapview(test1) # can show the map 
mapview(test2) # cannot show 

re.data.frame <- function(data, encoding = "UTF-8", fileEncoding="UTF-8"){ 
    write.csv(data, file("tmp.csv", encoding = encoding), row.names = F, fileEncoding=fileEncoding) 
    tmp <- readr::read_csv("tmp.csv", col_types = cols()) 
    return(tmp) 
} 

test2@data <- re.data.frame(test2@data) 
mapview(test2) # can show 

しかし、テスト列の文字のポップアップが壊れたテキストです。

データは正しいです。

head(test2@data) 

# A tibble: 6 × 4 
Name MaxWind MinPress test 
<chr> <int> <int> <chr> 
    1 ALPHA  45  998 日本語 
2 ARLENE  60  989 五十嵐 
3 BRET  35  1002 日本語 
4 CINDY  65  991 五十嵐 
5 DELTA  60  980 日本語 
6 DENNIS  130  930 五十嵐 

Answer 1

コミットbc2c57fの時点で、これは修正されているはずです。 mapviewの次のCRANリリースまで、この問題を解決するには開発版（devtools::install_github("environmentalinformatics-marburg/mapview", ref = "develop")）を使用するだけです。

簡単に言えば、この動作はポップアップテーブルを計算上効率的に作成するために、フードの下で実行される私たちのRcppルーチンに関連していました。ここでは、UTF-8の代わりにユーザーのネイティブエンコーディングを使用してJSON出力ファイルを作成しました。その結果、UTF-8がデフォルトではない一部のコンピュータでテキスト出力が破損していました。