Chaning choropleth hcmapのラベル

Question

私は、次のデータセットがあります。

structure(list(code = structure(1:6, .Label = c("?elino", "?tip", 
"?uto Orizari", "Aerodrom", "Aracinovo", "Berovo", "Bitola", 
"Bogdanci", "Bogovinje", "Bosilovo", "Brod", "Brvenica", "Butel", 
"Ca?ka", "Cair", "Ce?inovo-Oble?evo", "Centar", "Centar ?upa", 
"Cucer Sandevo", "Debar", "Debarca", "Delcevo", "Demir Hisar", 
"Demir Kapija", "Dojran", "Dolneni", "Drugovo", "Gazi Baba", 
"Gjorce Petrov", "Gostivar", "Gradsko", "Ilinden", "Jegunovce", 
"Karbinci", "Karpo?", "Kavadartsi", "Kicevo", "Kisela Voda", 
"Kocani", "Konce", "Kratovo", "Kriva Palanka", "Krivoga?tani", 
"Kru?evo", "Kumanovo", "Lipkovo", "Lozovo", "Makedonska Kamenica", 
"Mavrovo and Rostusa", "Negotino", "Northeastern", "Novatsi", 
"Novo Selo", "Ohrid", "Oslomej", "Pelagonia", "Phecevo", "Plasnica", 
"Polog", "Prilep", "Probistip", "Radovis", "Rankovce", "Resen", 
"Saraj", "Skopje", "Sopiste", "Southeastern", "Struga", "Studenicani", 
"Sveti Nikole", "Tearce", "Tetovo", "Valandovo", "Vardar", "Vasilevo", 
"Veles", "Vev?ani", "Vinitsa", "Vrane?tica", "Zajas", "Zelenikovo", 
"Zrnovci"), class = "factor"), value = c(48L, 1810L, 205L, 1507L, 
38L, 66L), OPSTINA_NAZIV = c("ЖЕЛИНО", "ШТИП", "ШУТО ОРИЗАРИ", 
"АЕРОДРОМ", "АРАЧИНОВО", "БЕРОВО"), `postal-code` = c("ZE", "ST", 
"SO", "AD", "AR", "BR")), .Names = c("code", "value", "OPSTINA_NAZIV", 
"postal-code"), row.names = c(NA, 6L), class = "data.frame") 

と私は以下のhcmap機能付きchoroplethマップをプロットしています。しかし

hcmap("countries/mk/mk-all.js", data = data_fake, 
     name = "Manucipalities", value = "value", joinBy = c("name", "code"), 
     borderColor = "transparent") %>% 
    hc_colorAxis(dataClasses = color_classes(c(seq(0, 2000, by = 500), 13000))) %>% 
    hc_legend(layout = "vertical", align = "right", 
      floating = TRUE, valueDecimals = 0, valueSuffix = "") %>% 
hc_mapNavigation(enabled = TRUE) 

を、現時点でラベルことマップに表示されるのは、コードの問題を含む "code"変数からのものです。私は "OPSTINA_NAZIV"ラベルからラベルをプロットしたいと思います。

どうすればいいですか？

私が試した：

dataLabels = list(enabled = TRUE, format = '{point.OPSTINA_NAZIV}') 

をしかし、それはうまくいきませんでした。

Answer 1

mapDataの情報には、optionsのアクセサリーを使用してアクセスできます。例{point.options.OPSTINA_NAZIV}：

hcmap("countries/mk/mk-all.js", data = data_fake, 
     name = "Manucipalities", value = "value", joinBy = c("name", "code"), 
     borderColor = "transparent" , 
     dataLabels = list(enabled = TRUE, format = "{point.options.OPSTINA_NAZIV}"))