mathematica中数组一维转二维

版权声明:本文为博主原创文章,禁止转载。联系方式:[email protected] https://blog.csdn.net/WMN7Q/article/details/77926489

博客推荐

惯例还是先推荐一下我的两个网站:
一个关于数学和编程的网站:数学文艺君
我的个人网站:我的个人小站

这里的文章会首发字文艺数学君,欢迎大家提出意见

问题来源

在使用下面的代码时,不能显示列标题

TableForm[{1, 2, 3}, TableHeadings -> {{a, b, c}, {d}}]

上面代码的效果如下图所示,很明显是不对的,因为少了列标d,那么究竟是什么原因呢?

这里写图片描述

问题原因

最后发现是因为 {1, 2, 3} 是一维的, 转换成二维就可以,即{{1},{2},{3}}

TableForm[{{1}, {2}, {3}}, TableHeadings -> {{a, b, c}, {d}}]

这里写图片描述

解决办法

那么我们有什么办法可以快速将一维数组变成二维数组呢,我们有以下两种办法?

方法一

Transpose[{{1, 2, 3}}]

方法二

Map[List, {1, 2, 3}]

具体效果我们可以看下图所示

这里写图片描述

最后我们给出一个整体的代码:

扫描二维码关注公众号,回复: 3774982 查看本文章
TableForm[List /@ {1, 2, 3}, TableHeadings -> {{a, b, c}, {d}}]

这里写图片描述

以上,所有

2017 / 09 / 10

猜你喜欢

转载自blog.csdn.net/WMN7Q/article/details/77926489
今日推荐