> my.dat$gdp=data[,4]
Error in `$<-.data.frame`(`*tmp*`, "gdp", value = c(1322.40585, 546.2449,  :
  替换数据里有252行，但数据有0
我看了一下，没有数据是0呀