| 查看: 2090 | 回复: 4 | ||
[求助]
Fortran输出二进制数据，用matlab读出，结果出错，求助问题何在？已有2人参与
|
|
----------------------------------------------------------------------------------------- ! fortran 程序将整数写入文件 program databin integer M2, NP1 M2 = 512 NP1=35001 open(unit=66,file='data.BIN',action='WRITE',form='UNFORMATTED',RECL=4) write(66) M2 write(66) NP1 close(66) end program ----------------------------------------------------------------------------------------- % matlab程序将数据读入 clc; clear all; close all; % fname = 'data.BIN'; fid = fopen(fname,'rb'); M2 = fread(fid,1,'int32'); NP1= fread(fid,1,'int32'); fclose(fid); disp(fprintf('M2 = %d, NP1 = %d\n',M2,NP1)); %matlab读入输出结果为 M2 = 4, NP1 = 512 18 不知道错在哪？请诸位帮忙指点一下！ |
回复此楼» 猜你喜欢
请问有评职称，把科研教学业绩算分排序的高校吗
已经有6人回复
-
2025冷门绝学什么时候出结果
已经有6人回复
-
Bioresource Technology期刊，第一次返修的时候被退回好几次了
已经有7人回复
-
真诚求助：手里的省社科项目结项要求主持人一篇中文核心，有什么渠道能发核心吗
已经有8人回复
-
寻求一种能扛住强氧化性腐蚀性的容器密封件
已经有5人回复
-
请问哪里可以有青B申请的本子可以借鉴一下。
已经有4人回复
-
请问下大家为什么这个铃木偶联几乎不反应呢
已经有5人回复
-
天津工业大学郑柳春团队欢迎化学化工、高分子化学或有机合成方向的博士生和硕士生加入
已经有4人回复
-
康复大学泰山学者周祺惠团队招收博士研究生
已经有6人回复
-
AI论文写作工具：是科研加速器还是学术作弊器？
已经有3人回复
» 本主题相关价值贴推荐，对您同样有帮助:
fortran中如何调用matlab中求解特征值函数？
已经有9人回复- 用fortran程序遗传算法解非线性方程组
已经有7人回复
- 求助大神：要做参数回归，fortran和matlab，该选择哪个？
已经有14人回复
- 想学fortran语言，会点MATlab基础
已经有5人回复
- fortran输出求助
已经有6人回复
- FORTRAN与MATLAB精度比较？
已经有8人回复
- C++编程，关于循环结构的，大家看看我这程序哪里错了？
已经有21人回复
- 求帮忙啊~ matlab一多项式结果太长，怎么写到txt里？
已经有14人回复
- fortran程序怎样调用lapack库进行矩阵对角化？
已经有7人回复
- 求助fortran编程时怎么使用数据库
已经有4人回复
- MATLAB 数据导入
已经有13人回复
- 【求助】matlab数据导入Fortran
已经有9人回复
- 【求助】fortran出错了
已经有3人回复
- 【求助】同样一个问题用matlab和fortran编程计算，结果相差比较大，不知道为什么
已经有4人回复
- 【求助】求高手关于Fortran数据读写的问题。【已完结】
已经有12人回复
- 【求助】VB如何读取txt文件~~
已经有12人回复
- 【求助】matlab的fit的结果读出问题，cfit的类型
已经有7人回复
- 【求助】fortran程序未出错，但运行不出结果，中途中断！
已经有6人回复
- 【求助】matlab读取fortran输出的txt文件【已解决】
已经有3人回复
2楼2014-01-06 01:30:09
3楼2014-01-06 09:40:44
baobiao007
木虫 (职业作家)
中国特色
- 应助: 201 (大学生)
- 金币: 6482.7
- 散金: 557
- 红花: 40
- 帖子: 3050
- 在线: 1009.9小时
- 虫号: 505962
- 注册: 2008-02-18
- 专业: 应用地球物理学
4楼2014-01-06 10:18:21
|
问题已解决。如下范例： open (1,file=fname,status='replace',form='unformatted',access='direct',recl=n*m ) write(1,rec=1) mat ! 先存行 close(1) % matlab nx=n; ny=m; fid= fopen(fname,'rb'); mat = fread(fid,[nx, ny],'int32'); fclose(fid); % mat(nx,ny) == mat(n,m) ! ! method 2 (把一行看做一个记录--n个记录, 一个记录长度为m) fname='data2-'//trim(adjustl(name1))//'-'//trim(adjustl(name2)) open (1,file =fname,status='replace',form='unformatted',access='direct',recl=m) do i=1,n write(1,rec=i) ( mat(i,j), j=1,m ) ! 先存列 enddo close(1) % matlab nx=n; ny=m; fid= fopen(fname,'rb'); mat = fread(fid,[ny, nx],'int32'); fclose(fid); M = mat'; % M(nx,ny) == mat(n,m) |
5楼2014-01-06 15:25:48