#
# #丹麥長寬比34:28。  垂直方向(红:白:红=3:1:3),水平方向(红:白:红=3:1:4.5至3:1:5.25)=>畫個大概

plot.new()
plot.window(xlim = c(0,30), ylim = c(0,35),xlab = NULL, ylab = NULL,
 type = "n",)
## Warning in plot.window(xlim = c(0, 30), ylim = c(0, 35), xlab = NULL, ylab =
## NULL, : 繪圖參數 "type" 已過時
title(main ="denmark")
rect(xleft = 1, ybottom = 1, xright = 12, ytop = 12,col="red", border="white")
rect(xleft = 1, ybottom = 16, xright = 12, ytop = 27,col="red", border="white")
rect(xleft = 15, ybottom = 1, xright = 34, ytop = 12,col="red", border="white")
rect(xleft = 15, ybottom = 16, xright = 34, ytop = 27,col="red", border="white")

##data resource

https://www.stat.auckland.ac.nz/~ihaka/120/Notes/ch03.pdf