我尝试绘制德国所有省份以及 googlevis gvisGeoChart 中的一些数据。
但是,并非所有省份都显示:图林根、巴登符腾堡和勃兰登堡都不见了。我想这与其中两个中包含的元音变音有关。但改用英文名或用“u”代替“ü”是行不通的。
所以我的问题是:是否有所有省份名称的来源。
bundeslander <-
structure(list(state.name = structure(1:16, .Label = c("Baden-Württemberg",
"Bayern", "Berlin", "Brandenburg", "Bremen", "Hamburg", "Hessen",
"Mecklenburg-Vorpommern", "Niedersachsen", "Nordrhein-Westfalen",
"Rheinland-Pfalz", "Saarland", "Sachsen", "Sachsen-Anhalt", "Schleswig-Holstein",
"Thüringen"), class = "factor"), abbrev = structure(c(3L, 4L,
2L, 1L, 5L, 7L, 6L, 8L, 9L, 10L, 11L, 13L, 14L, 15L, 12L, 16L
), .Label = c("(BB)", "(BE)", "(BW)", "(BY)", "(HB)", "(HE)",
"(HH)", "(MV)", "(NI)", "(NW)", "(RP)", "(SH)", "(SL)", "(SN)",
"(ST)", "(TH)"), class = "factor"), Share = c(12.1,
9.9, 14.1, 2.8, 12.7, 13.8, 11.5, 2.5, 6.9, 10.7, 7.9, 8.7, 2.9,
1.9, 5.3, 2.3)), .Names = c("state.name", "abbrev", "Share"
), class = "data.frame", row.names = c(NA, -16L))
G3 <- gvisGeoChart(bundeslander, "state.name", "Share",
options=list(region="DE", displayMode="regions", resolution="provinces",
width=600, height=400))
plot(G3)