;precip
dsize=dimsizes(precip)
nt=dsize(0)
nlat=dsize(1)
nlon=dsize(2)
i=0
;do j=0,nlon-1
;do i=0,nlat-1
do j=0,1
do i=0,1
;identify the unchaged point,and mark it as missing value
mark_series=precip(:,i,j)
max_mark=max(mark_series)
min_mark=min(mark_series)
if(isatt(max_mark,"_FillValue"))then
delete_VarAtts(max_mark,"_FillValue")
end if
if(isatt(min_mark,"_FillValue"))then
delete_VarAtts(min_mark,"_FillValue")
end if
if (max_mark.eq.min_mark) then
write_table("./uni_"+latitude(i)+"_"+longitude(j),"w",mark_series,"%12.3f")
end if
;identify the once missed point,and mark it all missing in the time dimension
signal=ind(ismissing(mark_series))
if (dimsizes(signal).gt.3) then
write_table("./mis_"+latitude(i)+"_"+longitude(j)+"_"+dimsizes(signal),"w",mark_series,"%12.3f")
i=i+1
end if
delete(signal)
delete(mark_series)
end do
end do
demissing
最后编辑于 ：
©著作权归作者所有,转载或内容合作请联系作者
- 文/潘晓璐 我一进店门，熙熙楼的掌柜王于贵愁眉苦脸地迎上来，“玉大人，你说我怎么就摊上这事。” “怎么了？”我有些...
- 文/花漫 我一把揭开白布。 她就那样静静地躺着，像睡着了一般。 火红的嫁衣衬着肌肤如雪。 梳的纹丝不乱的头发上，一...
- 文/苍兰香墨 我猛地睁开眼，长吁一口气：“原来是场噩梦啊……” “哼！你这毒妇竟也来了？” 一声冷哼从身侧响起，我...
