求助,Mathematica绘图相关
mathematica吧
全部回复
仅看楼主
level 1
帝之殇往 楼主
我的目标是将一个矩阵元为关于x的函数的3*3矩阵里的函数提取出来分别绘图,在最后一步我尝试用Do循环解决,但是代码可以运行但没有输出,不知道为什么会这样。
下面是我的代码:
L = {{x, Sqrt[x], x^2}, {1 + 3 x, 2 + x, E^x}, {Log[x], Sinh[x],
Cosh[x]}};
func[11] = L[[1, 1]];
func[12] = L[[1, 2]];
func[13] = L[[1, 3]];
func[21] = L[[2, 1]];
func[22] = L[[2, 2]];
func[23] = L[[2, 3]];
func[31] = L[[3, 1]];
func[32] = L[[3, 2]];
func[33] = L[[3, 3]];
Do[{Plot[Tooltip[func[ij]], {x, 1, 6}]}, {i, 1, 3}, {j, 1, 3}]
2023年09月12日 08点09分 1
level 1
帝之殇往 楼主
刚开始学这个,感谢大佬们有空解答我这个小问题
2023年09月12日 08点09分 2
吧务
level 10
Table
2023年09月16日 08点09分 3
table可以产生坐标轴,但是没有图像输出
2023年09月18日 07点09分
吧务
level 12
1. Do只有执行没有输出,想看到输出的话请用Table
2. ij是一个名叫ij的新变量,不是i和j直接连起来,硬按你这种写法的话请把func里的ij换成10*i+j
3. 其实完全没必要做func的那些定义,直接用Part就行,代码如下
L = {{x, Sqrt[x], x^2}, {1 + 3 x, 2 + x, E^x}, {Log[x], Sinh[x], Cosh[x]}};
Table[Plot[Tooltip[L[[i, j]]], {x, 1, 6}], {i, 1, 3}, {j, 1, 3}] // Grid (*分开画*)
Plot[Evaluate@Table[Tooltip[L[[i, j]]], {i, 1, 3}, {j, 1, 3}], {x, 1, 6}] (*一起画*)
Plot[Evaluate[Tooltip@L], {x, 1, 6}] (*更简单的一起画*)
2023年09月18日 10点09分 4
感谢您!我之前是一个一个算的就用这种表达方法,现在需要把他们整合起来就惯性的用了ij的表示方法,一直没有意识到这里的问题[泪]
2023年09月18日 16点09分
1