公告:1)网站程序升级:Q2A升级到1.8.6,Wordpress升级到5.7.2
2)修复了头像加载慢与提交问题反应慢等问题
2021-06-16

欢迎来到 Mathematica 问答社区

提问时请贴上文本代码

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

被禁止的话题:广告破解

请阅读:《提问的智慧》

备用域名:mma.ooo

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

社区建议QQ群:365716997

分类

+2 投票
426 浏览

今天用MMA输出一个代码页面,可是输出后发现页面宽度比较小,把输入输出符号in[] out[]都省略了,想问一下,如何提高输出宽度,以及输出质量,最后不要让Export["1.png", InputNotebook[]]输出在图片上...

a = 1; b = 3; c = -4; d = 1;
A = b^2 - 3 a c
B = b c - 9 a d
CC = c^2 - 3 b d       (*由于C在MMA中已经被系统占用,这里用CC*)
Export["计算一元三次方程.png", InputNotebook[]]

分类:图像处理 | 用户: mma-2-2-2 (1.3k 分)
刚才忘了resolution的事情了,已经添加

1个回答

+6 投票
 
已采纳

问题1:输出没有Cell Label

这应该是一个选项的问题而不是Window宽度的问题,对比如下:

观察以下效果:

得到的a.png

更改选项:

得到:

问题2:删去最后一行

复制以下code到同一个cell里面

SetOptions[InputNotebook[], CellLabelAutoDelete -> False];
temp = InputNotebook[];
SelectionMove[temp, Previous, CellGroup];
NotebookDelete[temp];
Export["a.png", temp]

执行前:

执行后:

导出的文件:

问题3:提高输出质量

最后一行代码可以改为

Export["a.png", temp, ImageResolution -> 200]

后面那个数你可以自己看着调整

用户: happyfish (1.8k 分)
修改于 用户:happyfish
太感谢了 输出技巧算是基本掌握了
...