File:China_map.svg
維基百科,自由的 encyclopedia
此SVG文件的PNG预览的大小:616 × 553像素。 其他分辨率:267 × 240像素 | 535 × 480像素 | 856 × 768像素 | 1,141 × 1,024像素 | 2,281 × 2,048像素。
原始文件 (SVG文件,尺寸为616 × 553像素,文件大小:224 KB)
摘要
描述China map.svg |
English: The territories actually controlled by the People's Republic of China (purple) and the Republic of China (orange).
The territorial waters off Fujian are specifically marked as controlled by the Republic of China, but not all islands in the waters off Fujian are controlled by the Republic of China. Islands and reefs in the South China Sea are not all marked, only those controlled respectively by the People's Republic of China and the Republic of China are indicated.
中文(臺灣):中華人民共和國(紫色)與中華民國(橘色)實際控制的領土。
福建外海特別標示中華民國所控制領土,但不表示所有福建外海島嶼皆由中華民國所控制。南海海域諸島礁並未被全部標示,僅標示出分別由中華人民共和國及中華民國實際控制之島嶼。 |
日期 | |
来源 | 自己的作品 |
作者 | Chen-Pan Liao |
SVG开发 InfoField |
R code
library("rnaturalearth") library("rnaturalearthdata") library(ggplot2) library(extrafont) loadfonts() # Liberation Sans sessionInfo() # R version 4.3.3 (2024-02-29 ucrt) # Platform: x86_64-w64-mingw32/x64 (64-bit) # Running under: Windows 10 x64 (build 19045) # # Matrix products: default # # # locale: # [1] LC_COLLATE=English_United States.utf8 LC_CTYPE=English_United States.utf8 # [3] LC_MONETARY=English_United States.utf8 LC_NUMERIC=C # [5] LC_TIME=English_United States.utf8 # # time zone: Asia/Taipei # tzcode source: internal # # attached base packages: # [1] stats graphics grDevices utils datasets methods base # # other attached packages: # [1] extrafont_0.19 ggplot2_3.5.1 rnaturalearthdata_1.0.0 rnaturalearth_1.0.1 # # loaded via a namespace (and not attached): # [1] Matrix_1.6-5 gtable_0.3.5 jsonlite_1.8.8 dplyr_1.1.4 compiler_4.3.3 # [6] tidyselect_1.2.1 Rcpp_1.0.12 parallel_4.3.3 scales_1.3.0 lattice_0.22-6 # [11] R6_2.5.1 generics_0.1.3 classInt_0.4-10 sf_1.0-16 tibble_3.2.1 # [16] units_0.8-5 munsell_0.5.1 DBI_1.2.2 pillar_1.9.0 rlang_1.1.3 # [21] utf8_1.2.4 Rttf2pt1_1.3.12 terra_1.7-71 cli_3.6.2 withr_3.0.0 # [26] magrittr_2.0.3 class_7.3-22 digest_0.6.35 grid_4.3.3 rstudioapi_0.16.0 # [31] lifecycle_1.0.4 nlme_3.1-164 vctrs_0.6.5 KernSmooth_2.23-22 proxy_0.4-27 # [36] glue_1.7.0 farver_2.1.1 extrafontdb_1.0 codetools_0.2-20 ape_5.8 # [41] fansi_1.0.6 e1071_1.7-14 colorspace_2.1-0 httr_1.4.7 tools_4.3.3 # [46] pkgconfig_2.0.3 world <- ne_countries(scale = "medium", returnclass = "sf") islands <- data.frame( y = c(22.656938135472696, 22.053955753375806, 23.573864416271437, 26.368375734950668,26.22390394376239, 26.1541118784575, 25.957498600291473, 24.456809469124664, 24.431784235720272, 20.70240624955278, 10.377254484771324, 10.38541642954576, # 9.6432749998578, 9.925727385335414, 10.928052552023521, 8.864922456447362, 10.207104308708276, 9.71495178703929, 9.908743881274654, 16.53431109232499, 15.78338615348698, 16.668072305405857, 15.15979124885287), x = c(121.48693688520929, 121.54227393236144, 119.60316316550613, 120.49006525178886, 119.98444621280261, 119.93203256418563, 119.97874208352493, 118.39954051479884, 118.23880835819251, 116.72616701558418, 114.36515228360948, 114.41339086837809, # 112.97502441054232, 115.50849302067317, 114.07355306346844, 112.83052462436527, 114.22351755408815, 114.28656161110732, 114.49672046256076, 111.60717210694975, 111.2013009843816, 112.7298503820263, 117.763015440141), nation = c("Taiwan" |> rep(12), "China" |> rep(11)) ) capital <- data.frame( y = c(39.902607468694846, 25.039983287087757), x = c(116.40840251966281, 121.51233952920676), name = c("Beijing", "Taipei") ) ggplot(data = world) + geom_sf(color = 'white', fill = gray(0.7)) + geom_sf(color = 'white', mapping = aes(fill = name), data = subset(world, name %in% c("China", "Taiwan"))) + geom_point(data = islands, mapping = aes(color = nation, x = x, y = y), show.legend = F, size = 1) + geom_point(data = capital, mapping = aes(x = x, y = y), show.legend = F, size = 2, shape = 15) + geom_text(data = capital, mapping = aes(x = x, y = y, label = name), show.legend = F, size = 12/72*25.4, hjust = -0, vjust = -1) + coord_sf(xlim = c(75, 133), ylim = c(10, 52)) + scale_fill_manual("", values = c("#f1a340", "#998ec3") |> rev(), labels = paste("Territories controlled by the", c("PRC", "ROC"))) + scale_color_manual("", values = c("#f1a340", "#998ec3") |> rev(), labels = paste("Territories controlled by the", c("PRC", "ROC"))) + ylab("Latitude") + xlab("Longitude") + theme_minimal(base_size = 12, base_family = "Liberation Sans") + theme(legend.position = "bottom", panel.border = element_rect(fill = NA), axis.text = element_text(size = 12, color = 1), axis.ticks = element_line(color = 1), panel.grid = element_blank(), legend.text = element_text(size = 12, color = 1), ) ggsave("China map.svg", width = 7, height = 7)
许可协议
我,本作品著作权人,特此采用以下许可协议发表本作品:
本作品采用知识共享CC0 1.0 通用公有领域贡献许可协议授权。 | |
采用本宣告发表本作品的人,已在法律允许的范围内,通过在全世界放弃其对本作品拥有的著作权法规定的所有权利(包括所有相关权利),将本作品贡献至公有领域。您可以复制、修改、传播和表演本作品,将其用于商业目的,无需要求授权。
http://creativecommons.org/publicdomain/zero/1.0/deed.enCC0Creative Commons Zero, Public Domain Dedicationfalsefalse |
此文件中描述的项目
描繪內容
某些值没有维基数据项目
7 5 2024
文件历史
点击某个日期/时间查看对应时刻的文件。
日期/时间 | 缩略图 | 大小 | 用户 | 备注 | |
---|---|---|---|---|---|
当前 | 2024年5月8日 (三) 08:18 | 616 × 553(224 KB) | Chen-Pan Liao | optimize and fix typos | |
2024年5月7日 (二) 09:45 | 616 × 553(852 KB) | Chen-Pan Liao | Reverted to version as of 07:48, 7 May 2024 (UTC) | ||
2024年5月7日 (二) 09:45 | 616 × 553(859 KB) | Chen-Pan Liao | fix | ||
2024年5月7日 (二) 07:48 | 616 × 553(852 KB) | Chen-Pan Liao | Typos | ||
2024年5月7日 (二) 07:38 | 616 × 553(852 KB) | Chen-Pan Liao | Uploaded own work with UploadWizard |
文件用途
没有页面链接到本图像。
元数据
此文件中包含有扩展的信息。这些信息可能是由数码相机或扫描仪在创建或数字化过程中所添加。
如果此文件的源文件已经被修改,一些信息在修改后的文件中将不能完全反映出来。
宽度 | 492.49pt |
---|---|
高度 | 442.36pt |