公告:本站正式转型为非交互式静态网站!
转型:本站将通过笔记和博客的形式继续为大家服务,关于 Mathematica 问答服务请移步至QQ群:365716997
联系:如有问题请联系QQ群管理员,或发送邮件至:lixuan.xyz@qq.com。
感谢:最后非常感谢大家多年来的支持与帮助!
参考《互联网跟帖评论服务管理规定》《中华人民共和国网络安全法》《网络信息内容生态治理规定》《互联网用户账号信息管理规定》

—— 2022-11-27

欢迎来到 Mathematica 问答社区

提问时请贴上文本代码

语法高亮:在编辑器中点击

被禁止的话题:广告破解

请阅读:《提问的智慧》

备用域名:mma.ooo

支持LaTex数学公式
行内公式标识符:\$ 或“$\backslash ($”+“$\backslash )$”,
行间公式标识符:\$\$ 或 “$\backslash [$”+“$\backslash ]$”

社区建议QQ群:365716997

分类

0 投票
818 浏览
本人首次接触该软件,很多功能还不了解,目前有个问题,就是一个集合中有很多无向图,我想遍历转成矩阵的形式存储到TXT文件中,希望得到各位的帮助
分类:图论 | 用户: 执笔研默 (21 分)

1个回答

0 投票

假如有如下3个图

graphs = Table[RandomGraph[{10, 20}], 3]

下面批量导出,文件名分别为"1.txt", "2.txt", "3.txt"

MapIndexed[Export[ToString[First[#2]] <> ".txt", #] &, 
 Normal@*AdjacencyMatrix /@ graphs]

 

用户: Lozmlve*永 (1.2k 分)
谢谢您的解答,不过我刚输进去还是会出错,实在不知道错在哪个地方
...