表格大小 (39\times39)行和4列
library(tidyverse)
matrix(NA,nrow = 10,ncol = 4) %>%
`colnames<-`(c('国家A','国家B','是否接壤','是否隔海')) %>%
as.data.frame()
## 国家A 国家B 是否接壤 是否隔海
## 1 NA NA NA NA
## 2 NA NA NA NA
## 3 NA NA NA NA
## 4 NA NA NA NA
## 5 NA NA NA NA
## 6 NA NA NA NA
## 7 NA NA NA NA
## 8 NA NA NA NA
## 9 NA NA NA NA
## 10 NA NA NA NA