24小时热门版块排行榜    

CyRhmU.jpeg
查看: 11022  |  回复: 134
【奖励】 本帖被评价106次,作者ryhzd增加金币 82.2

ryhzd

木虫 (正式写手)


[资源] 【分享】将Mathematica绘图数据转换至Origin软件

看到一些朋友求助Mathematica绘图的控制线性,如用三角、星形画线等,但Mahematica强项是函数画图,但对于图的控制还是欠缺,对不同曲线的区别不外乎用颜色、线性等区分,对线型的自定义是该软件的短处,我觉得最好办的方法是将数据输出到文本文件,用绘图软件(如Origin)来画图,特分享我给老婆写的程序,可以将Mathematica输出的数据文件转换为表格形式,便于导出到Origin中。使用方法程序上面有介绍,另外程序采用.Net 框架写成,所以有的电脑可能需要安装该框架才能运行。
回复此楼

» 收录本帖的淘帖专辑推荐

X-Ray Diffraction 科研工具 绘图软件 个人学习与收藏
资源 我的专贴

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
回帖支持 ( 显示支持度最高的前 50 名 )

wangww2011

木虫 (著名写手)


★★★★★ 五星级,优秀推荐


dubo(金币+1): 欢迎常来程序语言版讨论 2011-07-14 10:38:59
支持楼主
但不知道这个程序通用性怎么样,例如Plot,ListPlot,ContourPlot画的图都能导出吗?
因为这三个函数导出的数据默认是Line,Point和GraphicsComplex。

我以前碰到过要把数据从ContourPlot的画图中提取出来再重新处理的过程,我用Cases函数
譬如
plot = ContourPlot[Cos[x] + Cos[y] == 1/2, {x, 0, 4 Pi}, {y, 0, 4 Pi}]
data = Cases[plot, _GraphicsComplex, Infinity][[1]][[1]];
Export["/data/test.txt",data,"Table"]
这样导出的数据就应该可以用其他软件画图了

不过这种方法对与不同的数据要稍微改一改
例如对于Plot的绘图有
plot = Plot[Sin[x], {x, 0, 10}]
data = Cases[plot, _Line, Infinity][[1]][[1]]
Export["/data/test.txt",data,"Table"]
32楼2011-07-08 14:51:59
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

hailiang

金虫 (正式写手)


★★★★★ 五星级,优秀推荐

支持一下!
本文来自: 小木虫论坛 http://muchong.com/bbs/viewthread.php?tid=1789726&fpage=1
5楼2010-09-11 22:38:23
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

aruoo

木虫 (正式写手)


origin和matlab mathematica都有接口 可以调用的
101楼2015-06-01 15:44:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通回帖

★★★ 三星级,支持鼓励

支持一下!
2楼2010-01-12 01:00:43
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

★★★★★ 五星级,优秀推荐

五星支持
3楼2010-01-12 11:00:18
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

~友~

铜虫 (初入文坛)


★★★ 三星级,支持鼓励

长长见识!
4楼2010-09-09 15:02:39
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ilovexiaomu

金虫 (小有名气)


★★★★★ 五星级,优秀推荐

支持一下
7楼2010-10-04 19:48:44
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ilovexiaomu

金虫 (小有名气)


我晕,支持一下后,运行不起,整个代码上来吧,楼主
8楼2010-10-04 19:50:12
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

★★★★★ 五星级,优秀推荐

支持分享!
9楼2010-10-04 23:39:02
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ryhzd

木虫 (正式写手)


引用回帖:
Originally posted by ilovexiaomu at 2010-10-04 19:50:12:
我晕,支持一下后,运行不起,整个代码上来吧,楼主

能说下出了什么提示信息么?
10楼2010-10-05 11:24:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ilovexiaomu

金虫 (小有名气)


引用回帖:
Originally posted by ryhzd at 2010-10-05 11:24:41:

能说下出了什么提示信息么?

不晓得是不是没安装你说那个。net才能运行哈。
不过我觉得应该能在mathematica程序里面直接把文件写入txt文档吧,然后用origin打开就可以画图了!
[img][/img]
11楼2010-10-05 12:29:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ryhzd

木虫 (正式写手)


引用回帖:
Originally posted by ilovexiaomu at 2010-10-05 12:29:51:

不晓得是不是没安装你说那个。net才能运行哈。
不过我觉得应该能在mathematica程序里面直接把文件写入txt文档吧,然后用origin打开就可以画图了!
[img][img]http://pic.muchong.com/201010/5/443234_122914.jp ...

应该是没有安装.net 框架造成的。
mathematica 导出txt文件以后,里面有很多代码,origin不能直接读取,所以才需要我的程序。
12楼2010-10-05 12:48:38
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ilovexiaomu

金虫 (小有名气)


复杂;origin是可以直接读取txt文档的!
13楼2010-10-05 21:27:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ryhzd

木虫 (正式写手)


引用回帖:
Originally posted by ilovexiaomu at 2010-10-05 21:27:00:
复杂;origin是可以直接读取txt文档的!

愿闻其详
14楼2010-10-05 22:47:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

AsdL1636


如何下载..
16楼2010-10-27 09:49:40
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
引用回帖:
Originally posted by AsdL1636 at 2010-10-27 09:49:40:
如何下载..

用金币兑换下载流量 就可以下载了
17楼2010-10-27 10:06:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wbjhpp

金虫 (初入文坛)


好贴,顶了!!
18楼2010-10-27 16:29:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

wuzh1987

铁虫 (小有名气)


引用回帖:
Originally posted by ryhzd at 2010-01-11 23:49:24:
看到一些朋友求助Mathematica绘图的控制线性,如用三角、星形画线等,但Mahematica强项是函数画图,但对于图的控制还是欠缺,对不同曲线的区别不外乎用颜色、线性等区分,对线型的自定义是该软件的短处,我觉得最 ...

请问楼主可以详细介绍下怎么将数据导入到Orign中吗?谢谢···
19楼2011-01-14 13:41:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

chuxinbsn

木虫 (小有名气)


★★★★★ 五星级,优秀推荐

look
20楼2011-01-14 23:10:47
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ryhzd

木虫 (正式写手)



dubo(金币+1): 欢迎常来程序语言版讨论 2011-07-14 10:39:18
引用回帖:
Originally posted by wuzh1987 at 2011-01-14 13:41:37:

请问楼主可以详细介绍下怎么将数据导入到Orign中吗?谢谢···

1. 首先用 Export命令将数据导出到指定文件,比如:
Export["c:\\data.txt", Plot[Sin[x], {x, 0, 10}]]
至于导出什么数据,什么函数,导出多少个点可以具体参看Plot函数
2。用我的程序打开你导出的数据,它会将数据转为合适数据(转换后的数据位置我都忘了放在哪了,如果不是你导出数据目录就是在 c 盘),再导入Origin即可。
21楼2011-01-17 22:14:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xshmh

木虫 (小有名气)


★★★★★ 五星级,优秀推荐


jjdg(金币+1): 感谢评价 2011-06-11 00:27:43
这个功能无敌了,太感谢了
24楼2011-06-11 00:20:33
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

woshilsh

荣誉版主 (职业作家)


★★★★★ 五星级,优秀推荐


jjdg(金币+1): 感谢评价 2011-06-13 00:43:50
支持,呵呵
25楼2011-06-11 09:04:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhongliuchen

新虫 (小有名气)


★★★★★ 五星级,优秀推荐


dubo(金币+1): 欢迎常来程序语言版讨论 2011-07-14 10:38:52
顶一下,感谢分享!谢谢牛人
31楼2011-07-06 22:26:22
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ryhzd

木虫 (正式写手)



dubo(金币+1): 欢迎常来程序语言版讨论 2011-07-14 10:39:08
引用回帖:
Originally posted by wangww2011 at 2011-07-08 14:51:59:
支持楼主
但不知道这个程序通用性怎么样,例如Plot,ListPlot,ContourPlot画的图都能导出吗?
因为这三个函数导出的数据默认是Line,Point和GraphicsComplex。

我以前碰到过要把数据从ContourPlot的画图中提取 ...

时间很久了,具体我记不清楚了,应该说明里面有介绍。好像ContourPlot目前版本不能导出,前一段时间想改进,但没时间做,就搁下了。
33楼2011-07-08 21:30:01
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

eddywang

禁虫 (小有名气)

本帖内容被屏蔽

36楼2011-09-08 10:09:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ryhzd

木虫 (正式写手)


引用回帖:
36楼: Originally posted by eddywang at 2011-09-08 10:09:52:
楼主,我这里不能运行的

需要安装 .NET Framework 3.5
百度以上内容,下载安装后就可以用了
37楼2011-09-08 11:04:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

LHY1

铜虫 (初入文坛)


应用程序正常初始化失败!不能运行。
40楼2011-10-12 17:32:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

forumts

木虫之王 (文坛精英)


★★★★★ 五星级,优秀推荐

不错
44楼2011-12-09 10:22:12
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

ryhzd

木虫 (正式写手)


引用回帖:
46楼: Originally posted by forumts at 2011-12-09 10:46:50:
顶一下,感谢分享!

呵呵,还要多谢你帮忙下载的高权文献。
47楼2011-12-10 20:05:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
简单回复
2010-09-24 20:05   回复  
 支持
wanggc293915楼
2010-10-26 18:00   回复  
 支持
_aqing22楼
2011-05-10 21:10   回复  
dubo(金币+1): 欢迎常来程序语言版讨论 2011-07-14 10:39:25
三星好评  顶一下,感谢分享!
penguin23楼
2011-06-03 11:33   回复  
dubo(金币+1): 欢迎常来程序语言版讨论 2011-07-14 10:39:32
五星好评  顶一下,感谢分享!
hopeyun26楼
2011-06-22 11:04   回复  
jjdg(金币+1): 感谢评价 2011-06-22 12:27:00
五星好评  顶一下,感谢分享!
hopeyun27楼
2011-06-22 11:08   回复  
jjdg(金币+1): 感谢参与 2011-06-22 12:27:06
jjdg(金币+1): 欢迎新虫 2011-06-22 12:27:18
顶一下,感谢分享!
njudingo28楼
2011-06-26 17:08   回复  
jjdg(金币+1): 感谢评价 2011-06-27 03:01:17
五星好评  顶一下,感谢分享!
zjxqwer29楼
2011-06-28 15:54   回复  
dubo(金币+1): 欢迎常来程序语言版讨论 2011-07-14 10:39:41
五星好评  顶一下,感谢分享!
swp9730楼
2011-07-04 18:34   回复  
jjdg(金币+1): 感谢参与 2011-07-05 12:41:20
五星好评  顶一下,感谢分享!
wanghy6334楼
2011-08-10 14:36   回复  
jjdg: 感谢参与 2011-08-10 15:20:28
五星好评  顶一下,感谢分享!
nestajcg35楼
2011-09-04 21:25   回复  
五星好评  顶一下,感谢分享!
dict12338楼
2011-09-19 19:47   回复  
五星好评  顶一下,感谢分享!
LHY139楼
2011-10-12 17:25   回复  
五星好评  谢谢分享!
hhetong41楼
2011-10-23 15:06   回复  
五星好评  顶一下,感谢分享!
iangie42楼
2011-11-10 17:51   回复  
五星好评  顶一下,感谢分享!
cy20043楼
2011-12-05 17:01   回复  
五星好评  顶一下,感谢分享!
forumts45楼
2011-12-09 10:45   回复  
顶一下,感谢分享!
forumts46楼
2011-12-09 10:46   回复  
顶一下,感谢分享!
樟树48楼
2012-02-24 21:21   回复  
一般  谢谢分享!!!
fn001cn49楼
2012-03-13 09:42   回复  
五星好评  顶一下,感谢分享!
2012-04-14 18:36   回复  
五星好评  谢谢分享!
相关版块跳转 我要订阅楼主 ryhzd 的主题更新
☆ 无星级 ★ 一星级 ★★★ 三星级 ★★★★★ 五星级
普通表情 高级回复(可上传附件)
信息提示
请填处理意见