- 积分
- 2356
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2015-3-27
- 最后登录
- 1970-1-1
|
发表于 2024-4-25 09:34:36
|
显示全部楼层
回帖奖励 +2 金钱
resr@gsLineThicknessF= 3
resr@gsLineDashPattern = 16
rc_pos = regline(xx_pos, yy_pos) ; slope
df_pos = rc_pos@nptxy-2
prob_pos = (1 - betainc(df_pos/(df_pos+rc_pos@tval^2), df_pos/2.0, 0.5) )
xx1a = (/0,0.9/)
yy1a = (/0*rc_pos+rc_pos@yintercept,0.9*rc_pos+rc_pos@yintercept/)
rc_neg = regline(xx_neg, yy_neg) ; slope
df_neg = rc_neg@nptxy-2
prob_neg = (1 - betainc(df_neg/(df_neg+rc_neg@tval^2), df_neg/2.0, 0.5) )
xx2a = (/-0.9,0/)
yy2a = (/-0.9*rc_neg+rc_neg@yintercept,0*rc_neg+rc_neg@yintercept/)
if (prob_pos.ge.0.95) then
resr@gsLineDashPattern = 0
else
resr@gsLineDashPattern = 16
end if
aadd_line_pos = gsn_add_polyline(wks, plot1(1), xx1a, yy1a, resr)
if (prob_neg.ge.0.95) then
resr@gsLineDashPattern = 0
else
resr@gsLineDashPattern = 16
end if
aadd_line_neg = gsn_add_polyline(wks, plot1(1), xx2a, yy2a, resr)
|
|