求解答！nc文件转csv文件后时间格式出错

最好的明天

最近用ncl提取一个nc文件的一段时间和一个范围内的变量数据输出到一个csv文件中，用Excel打开后时间一直是1.09E+06这种乱码，调了单元格格式之后也不对，代码如下，麻烦各位大神帮我看看，跪谢！！！
begin
;fils=systemfunc("ls *.nc")
;f=addfile("F:/pre_all.nc","r")
f=addfile("F:/ncep/pr_wtr.eatm.2016.nc","r")
time = cd_calendar(f->time, -3)
mm = time/10000%100
data = short2flt(f->pr_wtr)
imm = ind(mm.ge.6.and.mm.le.8)
;stime = time(imm)
spre = data(imm,{30:37.5},{90:97.5})
;spre&time = stime
;delete([/time,data,mm,imm/])
;cont = where(spre.ge.20., 1, 0)
;copy_VarCoords(spre, cont)
;dim = dimsizes(cont)


;
; Read the 1D coordinate arrays, conform them to 4D,
; then convert to 1D so we can write them to CSV
; file along with data.
;
  dims   = dimsizes(spre)
  time1d = ndtooned(conform_dims(dims,spre&time,0))
  lat1d  = ndtooned(conform_dims(dims,spre&lat, 1))
  lon1d  = ndtooned(conform_dims(dims,spre&lon, 2))

;---Construct header line
  field_names = (/ spre&time@long_name + " ["  + spre&time@units + "]", \
                   spre&lat@long_name  + " ["  + spre&lat@units  + "]", \
                   spre&lon@long_name  + " ["  + spre&lon@units  + "]", \
                   spre@long_name      + " ["  + spre@units      + "]"/)

  header = [/str_join(field_names,",")/]

;---Write header to CSV file.
  csv_filename = "pr_wtr.eatm.2016.csv"
  system("rm -rf " + csv_filename)
  write_table(csv_filename, "w", header, "%s")

;---Convert 4D arrays to 1D for writing to CSV file
  spre1d  = ndtooned(spre)

;---Write data to file
  alist  = [/time1d,lat1d,lon1d,spre1d/]
  format = "%g,%g,%g,%g"
  write_table(csv_filename, "a", alist, format)
end

kermit

你的时间被用科学记数法表示了
建议将它声明为string

最好的明天

kermit 发表于 2020-5-7 22:07
你的时间被用科学记数法表示了
建议将它声明为string

能说一下具体怎么改吗，脑阔懵了，拜托

小拉拉

formate="%d"试试