爱气象,爱气象家园! 

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

新浪微博登陆

只需一步, 快速开始

搜索
查看: 4213|回复: 8

[求助] 求助 有关SVD的问题 请帮忙

[复制链接]

新浪微博达人勋

发表于 2012-8-20 14:54:50 | 显示全部楼层 |阅读模式

登录后查看更多精彩内容~

您需要 登录 才可以下载或查看,没有帐号?立即注册 新浪微博登陆

x
本人求算极涡(500hPa高度距平场)和海冰的SVD,出现如下错误:

run-time error M6201:MATH-sqrt:DOMAIN error


对程序中的sqrt函数进行了检查,但未能发现怎样改正,请大家帮帮忙!!

其中:用北纬30度以北的500hPa高度距平场jwjp.bin代表极涡(2.5*2.5) jwjp.bin (843.75 KB, 下载次数: 1)
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2013-3-28 12:42:01 | 显示全部楼层
可能有缺测值   要先剔除
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2013-3-28 12:43:32 | 显示全部楼层
program tcundef
integer,parameter::NY=121*61
integer,parameter::NT=732
real,parameter::ZMV=-9.99e+33
real   ::Y(NY,NT),f(ny,nt)
open(unit=1,file='sst.grd',form='unformatted',access='direct',recl=ny)
     do j=1,nt
            read(1,rec=j)(Y(i,j),i=1,ny)
     enddo
close(1)

l1=0
do i=1,ny
if(y(i,1).ne.zmv)then
        l1=l1+1
        do k=1,nt

         f(l1,k)=y(i,k)
        enddo
          endif
enddo
write(*,*) l1

open(unit=11,file='tcsst.grd',form='unformatted',access='direct',recl=l1)
     do j=1,nt
            write(11,rec=j)(f(i,j),i=1,l1)
     enddo
close(11)
end
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2013-3-29 12:13:29 | 显示全部楼层
数据具体是咋处理的?
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2013-3-30 10:36:45 | 显示全部楼层
我也出现同样的问题了
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2013-7-23 15:53:27 | 显示全部楼层
同问,解决的话,把方法贴上来
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2013-7-23 16:17:19 | 显示全部楼层
检查数据没有缺测值,也出现同样的问题,如何处理呀
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2013-11-17 19:19:39 | 显示全部楼层
应该是缺测的问题
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2015-12-25 18:53:54 | 显示全部楼层
我也出现同样的问题了  怎么解决的
密码修改失败请联系微信:mofangbao
您需要登录后才可以回帖 登录 | 立即注册 新浪微博登陆

本版积分规则

Copyright ©2011-2014 bbs.06climate.com All Rights Reserved.  Powered by Discuz! (京ICP-10201084)

本站信息均由会员发表,不代表气象家园立场,禁止在本站发表与国家法律相抵触言论

快速回复 返回顶部 返回列表